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1.0 ABSTRACT 


THIS PROGRAM ALLOWS THE USER CHECK-OUT OR DEBUG THE 11A 
PR REAL-TIME CLOCK. THE LOGIC TEST IS SELF cONTAL ines 
AND NEEDS NO EXTERNAL NTENANCE HARDWARE OR OPERA 
INTERVENTION WITH ONLY ONE EXCEPTION: IF THE CUSTOMER HARDWARE 
CONNECTED TO THE KWV11 COULD INJECT SIGNALS ON ST2, ST1, OR 
SLAVE IN INPUTS, IT MUST BE DISCONNECTED. 


EVEN THOUGH THE KWV11 A PROGRAM WAS 
DESIGNED TO _ RUN POP-11 FAMILY COMPUTER. IF THE USER IS 
UNFAMILAR WITH AN LSI- SHOULD REVIEW SECTIONS 8.4 AND 8.5. 
A SOFTWARE SWITCH REGI IS INCLUDED WITH THIS PROGRAM 


EVERY EFFORT WAS MADE TO MAKE THIS PROGRAM CONFORM TO LSI-11 
yr RESTRICTIONS, HOWEVER; THE USER SHOULD READ SECTIONS 


Q@ BUS OPTION, THIS 


om 


2.0 REQUIREMENTS 


2.1 EQUIPMENT 


1. POP-11 FAMILY ag ST WITH 8K OF MEMORY (OR MORE) AND 1/0 
FACILITIES (1.E., 


2. KWV11 UNDER TEST. 


2.2 STORAGE 
THIS PROGRAM OCCUPIES AND USES &K OF MEMORY. 


SHAW At ttete tts Atti ht ht ets We eet MR Seon ist oti tad nped sprite pc} 


dP + ese: 
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LOADING PROCEDURE 


METHOD 

STANDARDS PROCEDURE FOR NORMAL BINARY TAPES SHOULD BE FOLLOWED. 
1. ABSOLUTE LOADER MUST BE IN MEMORY. 

2. PLACE BINARY TAPE IN READER. 

3. TYPE ADDRESS #7500 (S* DETERMINE BY LOCATION OF LOADER). 

4. TYPE “G” (PROGRAM WILL BE LOADED INTO MEMORY). 

THE PROGRAM CAN ALSO BE LOADED BY XXDP, ACT, OR APT. 


NON-STANDARD ADDRESS, VECTOR, OR USE OF SOFTWARE SWITCH REGISTER 


THIS PROGRAM IS SET TO TEST A KWV11 WITH A STANDARD ADDRESS AND 
VECTOR. IF ANY “OF THESE ARE DIFFERENT ON THE KWI1K YOU ARE 
TESTING, CHANGE THE CORRESPONDING LOCATION IN MEMORY BEFORE 
STARTING THIS TEST. 


CURRENT 
LOCATION TAG CONTENTS COMMENTS 
1250 SBASE : 170420 ; + OTNDER noe OF EQUIPMENT . 
1244 SVECT1: QO0440 3; INTERRUPT VECTOR #1 
176 S$SWREG: 000000 3M SWR. 
1157 STPFLG: .BYTE O t TERMINAL AVAIL 


ABLE” - 
:; FLAG (BIT<O:7>=0=YES) 


23 
bs 


SBLRR PSL SSSR REORE SS 


Res 


ruroforore 
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WcWwre 
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4.0 STARTING PROCEDURE 


4.1 CONTROL SWITCH SETTING 
F STARTING THE DIAGNOSTIC, SET ALL SWITCH REGISTER BITS AS 
BESiReD, See Section §.1- 


4.2 STARTING ADDRESSES 


200 START QGIC TESTS 
204 RESTART ADDRESS FOR LOGIC TEST 
210 1/0 SIGNAL TEST #1 

214 170 SIGNAL TEST #2 

220 1/0 som. teat #3 

230 PRODUCTION STARTING ADDRESS 
240 TESTOR STARTING ADDRESS 


i 
4.3 PROGRAM AND/OR OPERATOR ACTION 
LOAD PROGRAM INTO MEMORY. 


ENTER KEYBOARD “ODT”. 


3. ALTER LOCATION “SSWREG” (ADDRESS 176) TO REFLECT DESIRED 
OPTIONS OF A SWITCH REGISTER - SEE SECTION S.1. 


4. TYPE STARTING ADDRESS, FOLLOWED BY "G” TO START PROGRAM. 


GO1 
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217 

218 

213 S.0 OPERATING PROCEDURE 

221 

222 Lee 

223 

ees S.1 SWITCH REGISTER FUNCTION 

eek SWR BIT OCTAL FUNCTION WHEN SET 

228 

229 1S 100000 HALT ON ERROR 

230 14 0000 LOOP ON TEST 

231 13 020000 §§ INHIBIT ERROR TYPEOUT 

232 12 010000 ENABLE LINE FREQ. RATE TESTING 

233 il 004000 § INHIBIT ITERATIONS (SHORT PASS) 

234 10 000 # BELL ON ERROR 

235 09 001000 LOOP ON ERROR 

e328 08 400 LOOP ON TEST IN SWR <7:0) 

238 

239 

gio : S.2 SCOPE LOOPS 

242 IF AN ERROR OCCURS AND THE USER WISHES TO SCOPE THE ERROR 
243 “S$SWREG” SHOULD BE ALTERED TO 5200000" AT THE START OF THE TEST 
o44 TO HALT ON ERROR, THEN WHEN THE PROGRAM HALTS ON ERROR AND THE 
O4S CPU ENTERS “ODT*, "SSWREG” SHOULD BE ALTERED TO “O&0000" TO LOOP 
246 ON CURRENT TEST AND INHIBIT ERROR TYPEOUT, THEN TYPE “P™ TO 


247 CONTINUE PROGRAM EXECUTION. 
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stg 
251 S.3 PROGRAM AND/OR OPERATOR ACTION 
253. 

254 

e55 5.3.1 LOGIC TEST 

257 THE FIRST PASS THROUGH THE PROGRAM WILL BE MADE WITH ITERATIONS 
58 INHIBITED. SUCCESSIVE PASSES WILL ENABLE ITERATIONS IF SWRI1=0. 
£59 IF NOT INHIBITED BY APT, THE PROGRAM WILL LOOK FOR MORE KWV11’S 
61 TO EXERCISE, ONE PASS WILL EXERCISE ALL KWV11'S. 

eo 

eb3 IF FOUR UNITS ARE DETECTED, THE FOLLOWING WILL BE TYPED: 

255 UNIT #000001 COMPLETED TESTING UNIT #000002 

266 UNIT #000002 COMPLETED TESTING UNIT #000003 

267 UNIT #000003 COMPLETED TESTING UNIT #000004 

268 UNIT #000004 COMPLETED 

270 AT END OF PASS WHEN ALL UNITS HAVE BEEN TESTED, THE FOLLOWING 
er TYPEOUT WILL OCCUR: 

273 “ENDPASS 12 - TOTAL ERRORS 4 THERE ARE 4 (OCTAL) UNITS - 
end GOOD UNITS (L TO R) OOODOCO00000I0 

276 THIS INDICATES THAT THE PROGRAM HAS COMPLETED 12 OCTAL (10 
277 DECIMAL) PASSES. DURING THAT TIME 4(OCTAL) ERRORS WERE DETECTED. 
eg aL SO WE TESTED 4 UNITS AND THE THIRD UNIT WAS THE ONLY UNIT TO 
280 ; 

281 

2B2 

283 S.4 INHIBITING AUTO-SIZE FEATURE 

285 THIS PROGRAM WILL AUTOMATICALLY AUTO-SIZE AND TEST EACH KWV11 IT 
286 DETECTS ON THE SYSTEM. TO INHIBIT THIS FEATURE, SET BIT 15 OF 
287 LOCATION “SENVM". ALSO, TO TEST AN INDIVIDUAL KWV11 IN A GROUP 
288 SET THIS BIT AND REFER TO SECTION 3.2 FOR CHANGING THE BASE 
29 ADDRESS OF THE KWV11 UNDER TEST. 
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6.0 ERRORS 


6.1 


ERROR PRINTOUT 


PRINTOUT VARIES WITH THE ERROR DETECTED. THE ERROR PC TYPED OUT 
IS THE ACTUAL LOCATION OF THE ERROR CALL. 


A HALT_AT LOCATION “STYPE"+10 WHEN RUNNING WITH NO_ TERMINAL 
INDICATES AN E - .TO FIND OUT THE NUMBER OF THE 
ERROR, EXAMINE LOCATION “STSTNM™. THIS IS THE ITEM NUMBER OF THE 
ERROR. _TO FIND OUT WHAT OU HAVE BEEN GCTO 
TO THE ERROR POINTER TABLE BEGINNING AT LOCATION “ERRTB”. 


6.1.1 EXAMPLE 


IF WE EXAMINED LOCATION “STSTNM” AND FOUND A 5S(101) WE GO TO 
en “SERRTB” AND LOOK THROUGH THE ERROR POINTER TABLE UNTIL 


ITEM S. THE INFORMATION WOULD LOOK LIKE 


10 
NT 
;ITEM S 

EMS ;CLOCK SR DATA ERROR 

DHS *ERRPC ASR WAS S/B 

OTS : SERRPC, ASR, SBDDAT, SGDDAT 

DFO ALL NUMBERS ARE IN OCTAL FORM 
TO FIND OUT THE INFORMATION SPECIFIED BY OTS 
(SERRPC,BSR,SBDADR,SBDADR) FOLLOW THESE STEPS: 


1. LOOK_UP THE ADDRESS OF THE LABEL (1.£., SERRPC) IN THE SYMBOL 
TABLE WHICH FOLLOWS THE LISTING. 


2. #* PUT THIS ADDRESS IN THE SWITCH REGISTER AND DEPRESS THE 
LOAD ADDRESS SWITCH ON THE PROCESSOR’S CONSOLE. 


% NOW DEPRESS THE EXAMINE SWITCH. 

* THE DATA DISPLAYED IN THE DATA LIGHTS IS THE INFORMATION 
THAT WOULD HAVE BEEN PRINTED FOR HIS LABEL IF YOU HAD A 
INPUT/OUTPUT TERMINAL. 


SEE SECTION 8.4 FOR LSI-11 ODT COMMANDS. 


oN 
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NON-STANDARD ERROR HALTS 


BUS ERRORS WILL CAUSE A HALT TO THE ROUTINE “IOTRD”. THE ADDRESS 
THAT CAUSED THIS TRAP WILL BE IN ADDRESS “TRTO”. 


RESTRICTIONS 


EXTERNAL INPUTS 


EXTERNAL INPUTS SUCH AS “SLAVE IN", “STI” AND “ST2” MUST NOT BE 
CONNECTED TO ANY CUSTOMER HARDWARE THAT MIGHT GENERATE THESE 
SIGNAL WHILE THE DIAGNOSTIC IS RUNNING. 


STARTING RESTRICTION 


A FREE-RUNNING CLOCK, SUCH AS 60HZ FROM THE POWER SUPPLY, IS 
ar TACHED TO THE ™ LINE ON BOTH REV LEVEL C/D AND E 
SYSTEMS, AN INTERRUPT TO LOCATION 100 WILL OCCUR WHEN ING THE 
*G" AND “L” COMMANDS PRIOR TO EXECUTING THE FIRST INSTRUCTION. 
THEREFORE THIS PROGRAM CAN NOT DISABLE THE BEVNT BUS LINE BY 
INHIBITING INTERRUPTS. 


USER SYSTEMS REQUIRING A FREE-RUNNING CLOCK ATTACHED TO THE BEVNT 
BUS LINE CAN TEMPORARILY AVOID THIS SITUATION BY SETTING THE 
PSW(RS) TO 200, LOADING THE PC WITH THE STARTING ADDRESS INSTEAD 
HE “G" COMMAND, AND THEN YSING THE “P™ COMMAND. 
T COMMAND, THE PSW(RS) CAN BE SET 10 200, THEREBY 
TING INTERRUPTS TO AVOID RECEIVING THE EVENT’ INTERRUPT 
LOADING THE ABS LOADER. 


a a 
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7.3 


8.1 


8.2 


8.3 


POSSIBLE PROGRAM “BOMBS” 
THE FIRST TWO TESTS OF THIS PROGRAM CHECK TO SEE IF THE KWV11 
RESPONDS 10 ADDRESS THE PROGRAM THINKS ITS AT. IF THE pte 


DOES NOT RESPOND, A_BUS ERROR OCCURS. ALSO ERRORS CAN 
ot TIME THE PROGRAM SIZES TO SEE HOW MANY KWV11 ARE ON 


FOR MORE INFORMATION ON THE NEXT SUBJECT JAN. 1976 LSI-11 
ENGINEERING BULLETIN ISSUED BY THE DIGITAL CO COMPONENTS GROUP. 
Ce ped A ig A A aoe 


Re tues Hat ae SNOT SE ia TANOLE THE TRAP. oF Finis 


HAPPENS, “BONE AND POSSIBLY REWITE PARTS OF 
ITSELF. 


MISCELLANEOUS 


POWER FAIL 


AFTER A POWER FAILURE OCCURS, THE PROGRAM EXECUTION WILL og | 
| POINT WHERE THE POWER OCCURRED. THE PROGRAM WILL TYPE 


XXDP, ACT, APT 


THE PROGRAM IS CHAINABLE UNDER XXDP, ACT, OR APT. ALTHOUGH “APT 
HOOKS” HAVE BEEN INSTALLED, THEY HAVE NOT BEEN TESTED. 


EXECUTION TIME 


0.5 MINUTES (30 SEC) ITERATION INHIBITED - NO ERRORS 
2.5 MINUTES (150 SEC) WITH ITERATIONS - NO ERRORS 
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8.4 LSI-11 “ODT” COMMANDS 


8.5 


<CR> RETURN 


(LF> LINE FEED 


t (UPARROW) 
¢ (LEFT ARROW) 


DESCRIPTION 


CLOSE OPENED LOCATION AND ACCEPT NEXT 
COMMAND. 
CLOSE CURRENT LOCATION; OPEN NEXT SEQUENTIAL 
LOCATION. 


OPEN PREVIOUS LOCATION. 


TAKE CONTENTS OF OPENED LOCATION, INDEXED BY 
CONTENTS OF PC, AND OPEN THAT LOCATION. 


TAKE CONTENTS OF OPENED LOCATION AS ABSOLUTE 
ADDRESS AND OPEN THAT LOCATION. 


OPEN THE WORD AT LOCATION R. 
REOPEN THE LAST LOCATION. 


OPEN GENERAL REGISTER 
REGISTER). 


GOTO LOCATION R AND START PROGRAM. 


EXECUTE BOOTSTRAP LOADER USING N AS DEVICE 
CSR. CONSOLE DEVICE IS 177560. 


PROCEED WITH PROGRAM EXECUTION. 


RASES PREVIOUS NUMERIC CHARACTER. 
S A BACKSLASH (). 


N(O-7) OR S(PS 


RESPONSE 


ENTERING LSI-11 “ODT” 


THE HALT OR ODT MICROCODE STATE OF THE KDIIF (LSI-11 MODULE) CAN 
BE ENTERED IN FIVE DIFFERENT WAYS (OTHERS ARE A SUBSET OF THESE) 


FROM THE RUN STATE 


EXECUTION OF A LSI-11 HALT INSTRUCTION, 
A DOUBLE BUS ERROR, 


1 

2. 

3. AS A POWER UP OPTION, 

4. ASCII BREAK WITH DLV11 FRAMING 


ERROR ASSERTING THE 8B HALT 


_MO1 
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481 UPON ENTERING THE HALT STATE, THE KDI1F RESPONDS THROUGH THE SET 


482 OF COMMAND LISTED IN SECTION 8.4. 


’ NO1 
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486 8.6 USE OF PROGRAM SOFTWARE SWR 

488 THE PROGRAM SOFTWARE SWITCH REGISTER IS ENABLED IF 

490 1. NO HARDWARE SHR EXISTS; 

492 2. IF YOU START WITH ALL ONES (SWR=177777) IN THE SWITCH 

493 REGISTER. | 

495 THE SOFTWARE SWITCH REGISTER NRY BE CHANGED BY By TYPING {6 (CONTROL 

496 BND LETTER. G KEYS TYPED SIMULTANEOUSLY). WHEN 16 IS TYPED, THE 

497 PROGRAM RE WHERE XXXXXX EQUALS’ THE 

498 FORMER CONTENTS OF THE SWITCH REGISTER. 

500 IF YOU WISH TO KEEP THE CURRENT VALUE <CR>. IF YOU WISH TO 

501 CHANGE THE VALUE. TYPE THE NEW VALUE FOLLOWED BY'A CCR). 

503 IT_IS IMPORTANT TO NOTE THAT THE DIAGNOSTIC IS NOT RUNNING AFTER 

50° THE *G UNTIL A <CR> IS TYPED. 

506 

507 

508 8.7 SPECIAL 1/0 SIGNAL TESTS 

| THREE TESTS WERE INCLUDED TO. ENABLE CHECKOUT OF 1/0 SIGNALS: 
STl, ST2 CLOCK OVERFLOW. THESE TESTS HAVE A SPECIAL 
STARTING stores. NCE END-PASSES ARE IMMEDIATE, “END 


IS .__ERRORS ARE REPORTED BY TYPING OUT THE 
PC RHERE THe ERROR WAS DETECTED. WHEN START 
REMAINS IN A LOOP GENERATING AND DETECTING THE SPECIFIED SIGNALS. 
HALT ON ERROR AND INHIBIT ERROR TYPEOUT OPTIONS MAY BE USED. 


LOGIC TEST MUST HAVE ALREADY BEEN RUN ON THE KWV11. 


WUT nT UT uuu 
he ee 
ONMUW CWO 


23 
i 


SRE RENN Sos 


g 


Bae 


MACY11 27(665) 


B02 


21-FEB-77 14:43 PAGE 14 


8.7.1 1/0 SIGNAL TEST #1 ST1 IN, ST2 OUT 
SWITCH PACK S2 MUST BE SET UP AS FOLLOWS: 
SWITCH STATE 


1 OFF 


NOUL£Ctor 
Oo 
=z 


NOT USED 
THE FOLLOWING JUMPER MUST BE INSTALLED. 
J1-SS (ST2 OUT) TO Ji-VV (ST1 IN) 
LOAD AND START THE PROGRAM AT 210. 


8.7.2 1/0 SIGNAL TEST #2 CLOCK OVERFLOW TEST 
SWITCH PACK Se MUST BE SET UP AS FOLLOWS: 
SWITCH STATE 


NOW EWR 


NOT USED 
THE FOLLOWING JUMPER MUST BE INSTALLED. 

J1i-RR (CLOCK OVERFLOW) TO J1-TT (ST2 IN) 
LOAD AND START AT LOCATION 214. 
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8.7.3 1/0 SIGNAL TEST #3 ST1 OUT AND STe IN 
SWITCH PACK Se MUST BE SET UP AS FOLLOWS: 
SWITCH STATE 


NOUS WITH 


NOT USED 

THE FOLLOWING JUMPER MUST BE INSTALLED: 
Ji-UU (ST1 OUT) TO Ji-TT (ST2 IN) 

LOAD AND START AT LOCATION 220. 


8.8 PRODUCTION STARTING ADDRESS 


A SPECIAL STARTING ADDRESS HAS BEEN PROVIDED FOR IN-HOUSE 
PRODUCTION TO USE TO START he LOGIC DIAGNOSTIC AND INFORM THE 


TEST THAT PRODUCTION ,IS USING 


IN THE FIELD ONLY ENOUGH ADDRESSES WERE ALLOTED FOR 4 SEQUENTIAL 


KWV11S.__ WHEN THE LOGIC TESTS ARE STARTED AT LOCATION 200, 
ONLY AUTO-SIZE UP TO 4 KWV1IS. 


iN HOUSE TESTING MAY WISH TO EXERCISE UP TO 16 KWVIIS AT 


LOGIC TESTS MAY BE STARTED AT LOCATION 230 AND THE 


TIME. THE 
PROGRAM WILL AUTO SIZE UP TO 16 KWV1IS. 


Z 
5 
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8.9 TESTOR STARTING ADDRESS 


A SPECIAL STARTING ADDRESS HAS BEEN PROVIDED FOR ae eee TO 
USE TO START THE L Loci iy yg Ue AND INFORM THE PROGRAM THAT THE 
CLOCK MODULE IN TESTOR. 


S SEQUENCE OF TESTING. THE 
PROGRAM TONS. CABLE SHOULD CONNECT 
J1 ON THE CLOCK MODULE TO J10 ON THE TESTOR. SWITCHES 1 AND 3 OF 
Se BE ON, ALL OTHER SWITCHES ON Se 


8.10 TRAP CATCHER 


THE TRAP CATCHER IN THIS DIAGNOSTIC EMPLOYS A NEW CONCEPT. THIS 
CONCEPT WILL ENABLE USER OF THIS pianos TO GAIN MORE 
KNOWLEDGE OF THE EVENTS THAT LEAD THE PROGRAM TO THIS AREA. 


THE TRAP CATCH CONSISTS OF PC+2 AND JSR PC,RO. (I.E., LOCATION 
300 WOULD CONTAIN 302 AND LOCATION 302 WOULD CONTAIN 4700.) 


WHEN A DEVI The Pens 8 UNEXPECTEDLY TO THE TRAP CATCHER 
PC+2 OF THE TRAP AS AN ADDRESS OF THE FNTERRUPT 


TO GUARD AGAINST “REAL” BUS ERRORS ROUTING US THROUGH LOCATION 4 
TO “IOTRD”, WE CHECK TO SEE IF THE TRAP THAT BROUGHT US TO 
LOCATION 4 REALLY CAME FROM THE TRAP 7 TCHER AREA. IF NOT WE'LL 
HALT AND LEAVE THE TRAP ADDRESS IN 


MORE ABOUT THE INTERRUPT ERROR CAN BE FOUND IN THE DESCRIPTION OF 
THE ERROR IN THE PROGRAM LISTING IN THE ROUTINE “IOTRD”. 


x 
.NLIST HC, HD, CND 
“ENABL ABS 


: AMA 
"MCALL .HEADER, .SETUP, .SETTRAP, . TRMTRP, .STRAP, .SRDOCT, .STYPBIN 
“MC TYPOCS, : SPOWER, . SCATCH, -STYPOCT, .EQUAT. . SCNTAG, . SWRHT 
“MCALL .SEOP, .$ERROR 3SERRTYP, STYPDEC, .SSCOPE, .SREAD, . STYPE 
gical sacri, SER naR , SAPTYPE 
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TITLE 


aa ary t 1-DVKWA-B 


;#COPYRIGHT (C) 1976 
seDIGL TA EQUIPMENT CORP. 
MAYNARD, MASS. 01754 


Tenor BY EDWARD C. BADGER 
SSTHIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
; HPACKAGE 


éTn-1 
. SBTTL 


WE IK RC he IK Oe Oe i ic 2c 


DISPREG: 
SWREG: 


(MAINDEC-11-DZQAC-Ce), SEPT 14, 1976. 


OPERATIONAL SWITCH SETTINGS 


SWITCH USE 
1S HALT ON ERROR 
14 LOOP ON TEST 
13 INHIBIT ERROR TYPEOUTS 
11 INHIBIT ITERATIONS 
10 BELL ON ERROR 
9 LOOP ON ERROR 
8 LOOP ON TEST IN SWR<7:0> 


-SBTTL TRA’ CATCHER 


20 

;#ALL UNUSED LOCATIONS FROM 4-776 CONTAIN A “. +2" 
?#AND “JSR PC,RO” SEQUENCE TO CATCH ILLEGAL INTERRUPTS. 
#AND INTERRUPTS TO THE WRONG VECTOR. 

j HLOCATION 0 CONTAINS A O TO CATCH IMPROPERLY LOADED 


- WORD IOTRD, 200 ;HANDLE BUSS ERROR. 
a .WORD 0 SOFTWARE DISPLAY REGISTER. 
- WORD 0 , ; SOFTWARE SWITCH REGISTER. 
“WORD 104,200,2 s1F "8 EVENT“ON Q-BUS Js 

: CONNECTE NEED A WAY OF 

: IGNORING De INTERRUPTS. 
.-=200 
MP aaSTART 


dsIOTSTe 


ute pt remen” MACY11 27(66S) 
DVKWAB. P 


TRAP CATCHER 

oie 000220 000137 014132 
714 000230 
zt 000230 37 001460 
ote 000240 000137 001444 
719 

720 

7el 

7ee 

723 

ie . 

0011 

726 

727 

728 

729 

730 000011 
731 000012 
732 000015 
733 000200 
734 177776 
735 

= ORR 
738 177570 
739 177570 
740 

a 000000 
743 000001 
744 000002 
745 000003 
746 000004 
747 000005 
748 000006 
749 000007 
750 000006 
751 000007 
rs 

re 000000 
75S 000040 
756 000100 
757 000140 
758 000200 
759 000240 
ERS 
762 

763 

764 100000 
765 0000 
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JMP aeIOTST3 

.=230 

JMP VeWSTART ;WESTFIELD STARTING ADDRESS 
;ALL TESTER TESTS 


Air aeTSTSTR 
;1F STARTED HERE. 
PRODUCTION TO EXERCISE 
:UP TO 16 CLOCKS. NORMAL =4 
.SBTTL BASIC DEFINITIONS 
INITIAL 1AaoRess OF THE STACK POINTER ##* 1100 ##% 


“Ean ERT, ERROR » ERROR ; BASIC PENT TION OF ERROR CALL 


*:BASIC DEFINITION OF SCOPE CALL 

j AMISCELLANEOUS DEFINITIONS 
AT= 11 > ;CODE FOR HORIZONTAL TAB 
LF= 12 $3 FOR 
CR= 1 FOR 1h RETURN 
CRLF= 200 CODE FOR CARRIAGE RETURN-LINE FEED 
PS= 177776 : t BROCESSOR STATUS WORD 
.EQUIV PS.PSW 
STKLMT= 177774 3 STACK LIMIT REGISTER 
PIRG= 177778 PROGRAM IN TERRUPT REQUEST REGISTER 
DSWR= 17757 ? HARDWARE SWITCH REGISTER 
DDISP= 177570 ;:HARDWARE DISPLAY REGISTER 

¥GENERAL PURPOSE REGISTER IT 
ko= “0 NER Gite 
Rl= %1 GENERAL REGISTER 
R2= %2 *:GENERAL REGISTER 
R3= %3 33GE RAL REGISTER 
R4= “4  RENERAL REGISTER 
RS= %S *:GENERAL REGISTER 
Rb= % *:GENERAL REGISTER 
R7= “7 *:GENERAL REGISTER 
SP= “% ::STACK POINTER 
PC= “7 :;PROGRAM COUNTER 

“PRIORITY LEVEL DEFINITI 

bro= 0 ss PRIORITY Y LEVEL 0 
PRi=z 40 :PRIORITY LEVEL 1 

= 100 >:PRIORITY LEVEL 2 
PR3= 140 *:PRIORITY LEVEL 3 
PRH= 200 >:PRIORITY LEVEL 
PRS= 240 ::PRIORITY LEVEL 5S 
PRb= 300 >:PRIORITY LEVEL : 
PR7= 340 :PRIORITY LEVEL 7 
-#"SWITCH REGISTER" arene DEFINITIONS 
SwiS= 100000 
SWi4= 40000 


GOe 


INITIONS (BITOO TO BIT1S) 


as aie BeaeSaes 


- 
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a 
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20000 
19000 
4000 
2000 
1000 
400 
20U 
100 
35 
10 
4 
2 
1 
SWO9 
SWO8 
SWO7 
SWO6 
SWOS 
SWO4 
SWO3 
SWO1 
SWOO 
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ayatatafalatetetets) 


a 
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erettettstetatts 


a0 6 08 08 a8 ¢ O0 00 O00 04 00 0 0 4 0 00 Sure coy pata tatetetatatatatetetes 
REPEC EEEE S3asaaaaas Serer creer rere er aaaaaaaaaa 
a FO  niiainiesaiaissataiates eter cnononaioia 


;#BASIC “CPU” TRAP VECTOR ADDRESSES 


O-UMTinworwoo 
om owe Kae Keo Kaen Kot hem Nae Kom Kam I 
ODOOWWOODOWOMQ 


oO 
vi 
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ROSSORSRTERTS Be 


uf 


8888888 
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BASIC DEFINITIONS 
00004 ERRVEC= 4 ;;TIME_OUT AND OTHER ERRORS 
000010 RESVEC= 10 ;;RESERVED AND ILLEGAL INSTRUCTIONS 
000014 TBITVEC=14 i371" BIT 
000014 TRTVEC= 14 : TRACE TRAP 
000014 BPTVEC= 14  TBREAKPOINT TRAP (BPT) 
000020 TOTVEC= 20 S TNPUT/OUTPUT TR TRAP (107) #¥SCOPES* 
000024 PWRVEC= ; ]POWER FAIL 
000030 EMTVEC= 30 jSENULATOR TRAP (EMT) *¥ERRORE® 
000034 TRAPVEC=34 ;}"TRAP™ TRAP 
000060 TKVEC= 60 :TTY KEYBOARD VECTOR 
000064 TPVEC= 64 ::TTY PRINTER VECTOR 
000240 PIRQVEC=240 ::PROGRAM INTERRUPT REQUEST VECTOR 
20 ABASE= 170420 
000440 AVECTI= 440 
APRIOR= 200 
167400 SSWR= 167400 
000001 STN= 


-SBTTL ACT11 HOOKS 


REAR ERERLRLRLEK AAA RA ARAL A RARE RAK LRA LAER RA AAA EARS SAHE ELE 
? HOOKS REQUIRED BY ACT11 


oo0244 S$SVPC=. sSAVE PC 
000046 =46 

013660 SENQAD ;;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
000000 “WORD O ;32)SET LOC.52 TO ZERO 

poge44 " =$SVPC tt RESTORE PC 


.=1000 
-SBTTL APT PARAMETER BLOCK 


itt LOCATIONS 24 AND 44 AS REQUIRED FR Te 


eer LOCATIONS 24 AND 44 AS REQUIRED F: 
in ted oo ieee 


001000 . $X=. ;SAVE CURRENT LOCATION 
000024 =24 tcer POWER Aa TO POINT TO START OF PROGRAM 
000200 200, 3 3FOR APT ST 
000044 ;POINT TO eT INDIRECT ADDRESS PNTR. 
001000 SAPTHOR {POINT TO APT HEADER BLOCK 
00i000 *RESET LOCATION COUNTE! 

, seuansnbubseusediusacsedecousveusesecscuseecevepeuuensuesscasss 

APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
t INTERFACE SPEC. 
THD: 

000000 SHIBTS: .WORD O ;;TWO HIGH BITS OF 18 BIT MAILBOX ADDR 
001174 SMBADR: .WORD S$MAIL =;;ADDRESS OF APT MAILBOX (BITS 0-15) 
ooo002 STSTM: .WORD 2 ;;RUN TIM OF LONGEST TEST 
000170 SPASTM: .WORD 120. ;;RUN TIME IN ERs OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
000170 SUNITM: .WORD 120. : -ADDITIONAL gt TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
000031 -WORD $ETEND-SMAIL/2 ;;LENGTH MAILBOX-ETABLE (WORDS) 


Z 
oO 
U 
bp bs 


bp 


WOWOWnONDODWWWW 
eg et ey et er 
WON ©CWH-O 


RESET 
gesses 


PS rie tet pitied ttt bist RED RR : 


be b> pens bh fee bt Pe fh he bn Pe bh pe 


b= b= bb bo be be pep pe pe 


el oe ee oe ee on 


gil eed fer feet eaect 


BSSSsssssssssesssssess 
NISEREQRAOOBSES 
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COMMON TAGS 


me 
8 


cies 


000377 


Ide 


-SBTTL COMMON TAGS 


55 EAE SEE 9 9 9 
; THIS ae CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
;#USED IN THE PROGRAM. 


-=1100 
SCMTAG: ;;START OF COMMON TAGS 

WORD O 
STSTNM: .BYTE 0 ;;CONTAINS THE TEST NUMBER 
SERFLG: .BYTE 0 3 ;CONTAINS FI 
SICNT: .WORD 0 *:CONTRINS SUBTEST ITERATION COUNT 
SLPADR: WORD 0 *:CONTAINS SCOPE LOOP ADDRESS 

: :WORD O : CONTAINS RETURN FOR 

SERTTL: .WORD 0 >;CONTAINS TOTAL ERRORS DETECTED 
SITEMB: . 0 3;CONTAINS ITEM CONTROL BYTE 
SERMAX: . 1 $s CONTAINS MAX. ERRORS PER TEST 
SERCO: “Mond tT KONTRING ADDRESS OF FGooR’ DRIES ON 
SBDADR: :WORD 0 Contains ADDRESS OF *BAD’ DATA 
SGDDAT: :WORD 0 :;CONTAINS ’GOOD’ DATA 
SBDDAT: ‘WORD 0 >:CONTAINS BAD’ DATA 

“WORD : : :RESERVED--NOT TO BE USED 
SAUTOB: “BY : 0 ; sAUTOMAT NDICATOR 
SINTAG: “By if g + INTERRUPT NODE NOICATOR 
SUR: “HORD DSWR ;;ADDRESS OF SWITCH REGISTER 
DISPLAY: .WORD DDISP >:ADDRESS OF DISPLAY REGISTER 
anc: {Le ss Tty KBD STATUS 

. 77562 99 

STPS: 177564 :TTY PRINTER STATUS REG. ADDRESS 
STPB: 177566 >: TTY PRINTER BUFFER REG. ADORESS 
SNULL: .BYTE O >:CONTAINS NULL CHARACTER FOR FILLS 
SFILLS: :BYTE 2 ;:CONTAINS ® OF FILLER CHARACTERS REQUIRED 
SFILLC: :BYTE ie >: INSERT FILL CHARS. AFTER A “LINE FEED” 
STPFLG: :BYTE 0 "TERMINAL AVAILABLE” FLAG (B11<O7>=0=YES) 
SESCRPE:0 + CCAP ON ERROR -ABGRESS 
SBELL: .ASCIZ <207><377><377> $F oe ! FoR BELL 
SQUES: ASCII /?7 > :QUESTION MARK 
SCRLF: ‘ABI «15> CARRIAGE RETURN 


12> >: INE FEED 
5 333-3 3 8 99 9 9 0 
*SBTTL APT MAILBOX-ETABLE 


5 RRR REEL RARER RARE REEL EERE ARERR REESE SEES 


* EVEN 

$MAIL: ;;APT MAILBOX 
AMSGTY ::MESSAGE TYPE CODE 

AFATAL ::FATAL ERROR NUMBER 

ATESTN ;:TEST R 

APASS ;:PASS COUNT 

ADEVCT ::DEVICE COUNT 


JO2 
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27 (66S) 
ABLE 


MACY } 
APT MAILBOX 


~~ 
-é 
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P 


Be HERRSMREMRDREE 


ZS 


11720=03, 11/40=04, 11/4S=05 


TABLE 
ITS 
0S=0e, 
=07 , @=10 
OCK 


ADDRESS 


Bana 7428 
ttt tt 


Saaaa 


888888888 


he: 
x 


(HIGH BYTE) 


ie a Bw Sunk 
Sc’ at ak dees 
tt sSanaasens Bi 


a 


;:HIGH ADDRESS, M.S. BYTE 
*:MEM. TYPE BLKSL 
M. TYPE 8 


: .BYTE AMAMS 
-BYTE AMTYP1 hé 


1: 
TYP 1: 


000 


au2 001224 


THIS WORD AND LOW OF “TYPE” ABOVE 


ST me gel ee 


Device MAP 
ROLLER DESCRIPTION WORD#1 


: eae EoSccenesss 


Hae he ME et 
FSCCee aux 
5 ee BegsseD 


T 


“Ee eee 
RRNRELRNEE 


8 8888888888sssss 


FETTER ALARER RR RRRRRRE 


KO0e 
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DVKWAB. P11 OR POINTE! 

366 .SBTTL ERROR POINTER TABLE 

68 ETS TABLE CONTAINS T THE INE ORHA TION. FoR EA EACH E ERROR TH THAT CAN gat occur. 

: #LOCAT T T N T 

a Aare OOO, DAES HP aT aaa as TE fs PON 

372 EACH ITEM IN THE ABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOUS: 

974 + M : POI MESSAGE 

fe : F i}boints 10 The Bata nenoe 

307 * OF *:POINTS TO THE DATA FORMAT 

979 

980 001256 SERRTB: 

981 . 

zs ren 

985 001256 017134 EMI ;CLOCK SR FUNCTION ERROR 

986 001260 017457 DH1 *ERRPC ASR WAS S/B 

987 00leb2 017666 OT1 : SERRPC, ASR, SBDDAT, SGDDAT 

388 001264 017764 DFO "ALL NUMBERS ARE IN OCTAL FORM 

990 

eas ;ITEM 2 

993 001266 017166 EM2 ; CLOCK SR DATA ERROR 

aac Ou1e72 OLpeeG BY [i 

336 Bp S74 017764 DFO *ALL NUABERS Re IA goer FORM 

998 

1008 ;ITEM 3 

1001 001276 017214 EM3 ;CLOCK BR DATA ERROR 

1008 Bolsbe | Bt9708 BS ioc. seit secon Scone § 

1008 001304 017764 OFO “ALL NUMBERS ARE Ih rary FORM ’ 

1006 

1007 sITEM 4 

1b 001306 017242 EMY ; INTERRUPT ERROR. 

1010 001310 017527 DH4A ‘ERRPC TO ADDR. 

1014 a 1318 17712 OT4 : SERRPC, TRTO, TRFRO 

101¢ 001314 017764 OFO ALL NUMBERS ARE IN OCTAL FORM 

1014 

inte ;ITEM 6S 

1017 001 172 OcK ERROR 

ibia BolseB Bizae? Bui ifkoce — GOUNT fife ER 

1919 001322 017666 OT] SERRE, ACR, SBDDAT, sSeopat 


LOe 


ee ett ch eer te 21-FEB-77 14:43 PAGE 24 


1920 001324 017764 DFO ALL NUMBERS ARE IN OCTAL FORM 
1022 

1023 sITEM 6 

1025 001326 017325 EM12 sCLOCK COUNT FUNCTION ERROR 
1026 001330 017563 DHl2 * ERRPC 

1027 001332 017722 DTle *ERRPC, ASR 

1028 001334 017764 DFO ALL NUMBERS ARE IN OCTAL FORM 
1030 

1031 sITEM 7 

1033 001336 017354 EM16 ;CLOCK INTERRUPT ERROR 

1034 001340 017563 DH12 *ERRPC_ ASR 

1035 001342 017722 DTle *SERRPC, ASR 

103 001344 017764 OFO ALL NUMBERS ARE IN OCTAL FORM 
1038 

1038 ’ sITEM 10 

1041 00134 017405 EM20 sCLOCK REPEATABILITY ERROR 
1042 001350 017600 “ERFOR ASR _2ND CNT IST CNT 3RD CNT 
1043 001352 01 DT20 *SERRPC, ASR, SBDDAT, SGDDAT, STMPO 
1044 001354 017764 OFO ALL NUMBERS ARE IN OCTAL FORM 
1046 

1047 sITEM 11 

1049 001356 017306 EM11 ;CLOCK — COUNT ERROR 

1050 001360 017457 DH1 ERRPC WAS S/B 

1051 001362 017744 OT22 ?SERRPC, ASR, SB0DAT STMPO 
105 001364 017764 DFO *ALL NUMBERS ARE IN OCTAL FORM 
1054 

tee ;ITEM le 

1057 001 017434 EM26 ;CLOCK ADDRESSING ERROR 

{peg wei 017641 DHe6 * ERRPC sft OcK ADDR. 

1059 001372 017756 DTe6 SERRE TMPO 

1060 001374 017764 OFO L NUMBERS ARE IN OCTAL FORM 
1062 

1063 001376 170420 ASR: 

1064 O01400 170422 ABR: ORD ABASE+2 

1065 001402 ooo4'9 VECTI: 

1066 001404 O0044 VECTP: :WORD AVECTI+2 4 

1067 001406 VECT2: :WORD AVECTI+4 sVECTOR ADDR. OF ST2 INTRS. 
1068 001410 oo044e . VECTeP: :WORD AVECTI+6 

1069 001412 o00200 PRIOR: .WORD APRIOR 

1070 OO1414 167774 OR: “WORD 167774 

1071 O01416 167772 DR2: .WORD 167772 

1072 001420 o00000 STMPO: .WORD O ; TEMP STORAGE. ‘ 

1073 001422 000000 STMP1: .WORD O TMP STORAGE. 


MOe 
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, BYL*S D2 


S 
S 
1 SPECIAL TESTOR START 


AL UNITS TESTED. 


UNDER 
GOOD UN 
VICES TESTED. 
viees 7 Ie TESTED 


:POINT 
KEEPS 
* COUNTS 
OUNTS 
MAX DE 
ot 


QOo00000 


Esacscee 


LOBMEBSy 


rrr 
en pen en pan pan ban pan ben) 


88888888 


SESSESSSSE RRB RBSREREEERERE 


se ; 
beg & 
a2 § : 
3s = & 
we 2 fe 
5 & 
i Ke 
go 
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e 
nm & 
. : 4 
Bat see ze 
285 Sag EE 
F : § 
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36 


474 012737 000004 O014 
001440 


S02 005037 


i 


re Kom heme il ea ed oa 


8588S88S3S 


be hee hee hee hee hoe hee bee hee hoe hee bee hen hee bee hee ben hen bee hen hee hee hee hee hee hee bee hen! 


é 
E585 oo as 
BE Eb Soeats 
= al 
bef y Bbe 
aera “ 
Sud yess an oe rat 
Beil 


BERRERRR 
oooo0o0o00o0 


iberaatita ete he 


ibetariuf Letetc betes i 


THE HARDWARE SWR IS NOT = -1 
H IF NO TIMEOUT 


ety FOR A HARDWARE SWICH REGISTER 
UP FOR TRAP RETURN 


33AND A HARDWARE DISPLAY REGISTER 
3; RY TO REFERENCE HARDWARE SWR 


; ; BRANCH IF NO TIMEOUT TRAP OCCURRED 


~ 65S 


O-UMTiNwr. ac 
Sasha hemhees kamham hese hem hem) 


#65, (SP) 


BR . 
MOV 
RTI 


64S: 


76 
00 
04 


wrt. 
Soa ban ban! 


888 


Srurueututaeuca 
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DVKWAB.P11 INITIALIZE THE COMMON TAGS 
1128 001 1 000176 O01140 65S: MOV ;;POINT TO SOFTWARE SWR 
11 001714 Ol 174 001142 MOV Tg Ee DI 
it o 1 1 66S: MOV ;;RESTORE ERROR VECTOR 
1132 001 005037 001202 CLR SPAS ;CLEAR PASS COUNT 
1135 nee 132737 001215 BITB  sAPTSIZE, SENVM iiTEST USER SIZE UNDER APT 
1134 001 001403 BEQ 675 USE NON-APT SWITCH 
1135 001742 012737 001216 001140 MOV #SSWREG, SWR ::NO,USE APT SWITCH REGISTER 
113% 001750 67S: 
1138 
1139 001750 012746 000340 MOV #340, -(SP) sSET CPU PRIORITY ON RETERN. 
1140 cartes sean 001762 MOV #68$; -(SP) “SHOW RETURN ADDRESS. 
1141 001760 Od00002 RTI ;CAUSE A RETURN(PUTS STATUS IN STATUS REG.). 
ii 001762 68S 
1144 001762 001204 CLR SDEVCT PERO, DEN DEVICE COUNT. 
tie foley Gierer Quran SONS RAY SHOU ETE ae OR eT on 
Ly? 002002 013737 001250 001376 MOV SBASE, ASR FIX ADDRESS OF CSR. 
1149 .SBTTL TYPE PROGRAM NAME 
1150 TYPE THE NAME OF THE PROGRAM IF FIRST PASS 
1151 002010 005227 177777 INC 8-1 ss EIRSI TIME? 
1152 002014 001033 BNE 695. >BRANCH IF NO 
1153 002016 104401 o02064 TYPE ‘TYPE ASCIZ STRING 
tizd ogee 005737 oo004e — La value e'FOR aa site See EATING UNDER XXDP/ACT? 
1128 002030 eed 001214 000001 Bee “is i +r BRA be Fr NNENG UNDER APT? | 
1158 001406 Bro ee ieee ; ]BRANCH IF YES 
1159 025727 001140 000176 CMP . SR, #SWREG > SOFT WARE SWITCH REG SELECTED? 
1160 1005 BNE RR ae Baan 
1161 002050 10440 GTSUR via > . :GET Sort sun SETTINGS 
Lies 002054 112737 000001° 001134 71s: MOVB so] , SRUTOB 5387 AUTO-MODE INDICATOR 
iiee Gietee © c00110 vos: “asciz Sen CRLF anDL1- pvKul care eC 
1167 002104 . pet 
1168 poe 10% RSTART: 
1169 104 005737 001440 TST bs ; TESTOR MODE ENABLED?? 
Ht Bete TEA ooze fe lbs eee ater aga, 
1195 posite Bootes BR 64S tiCET OVER THE ASCIZ 
1173 am iag55: -ASCIZ <15><12>sTESTOR MODE ENABLED--SEE DOCUMENTATION FOR INSTRUCTIONS. 8 
il 14 1S: 
Life Be 04401 o02222 TYPE «67 STYPE ASCIZ STRING 
11 ll BR 66S i oer OVER HE ASCIZ 
Hg i878: “ASCIZ <15><125eTEST RUNNING... 
il Bose 005037 001434 : e355 ; TESTING a UNIT. 

- 1181 005037 001432 th : ERENT + ND ERRORS. 
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SESSRRIGRSSSSEREON 


= 


Bs Rs hs be Fh he fo fs Ps he Pe bp ee 
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MACYi1 
GET VALUE F' 


001 
OOy4e6 


-_ 


005037 
012737 
013737 
042737 
013737 661402 
062737 


013737 » 001402 
062737, 
O01 001406 
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0080: 
001376 
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SOFTWARE SWITCH REGISTER 


001426 
001430 
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001420 
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CLR 
MOV 

OV 
LOOP: 


SPASS 
#1, ROTATE 
ROTATE, UTEST 
#170000, VECT1 
vECTI vECTP 
#2, VECTP 
vECTI.VECT2 
#4, vEcT2 
vette. VECT2P 
#2, VECTOP 


ear 


;NO_ PASSES. 
;POINT TO FIRST UNIT. 
;COME HERE FOR NEXT UNIT,OR END PASS. 


;CLEAR OUT PRIORITY BITS. 
:NOW FIX VECTOR +2 ADOR. 


LETS, FIX ST2 VECTOR_ADOR. 
ITS 4 GREATER THEN THE IST. 
:VECTOR +2 ADDR. 


;FIX ADDR OF PRESET REG= 
;CSR +2 


0 mane oe gg a 7 eae 
THE ADDRESSABILITY OF CLOCK CS 


TEST 1 
tét1 


1$: MOV 


2S: 


#50, STIMES 
#1$,SLPADR 
"1 sate 


OBERRVEC, -(SP) 


#25, JERRVEC 


dASR 


3$ 


#4, SP 
ASR, STMPO 


jeeeaeapenneeneea een eente3 000A HEAESHEEDEER OTE AE TEEE 


;D0_ 50. TTERA 
ice Coo? Rooness 
biptT TES) a #1. 


; SAVE CONTENTS OF ADDRS 6. 


ise TIME-OUT TRAP VECTOR TO HANDLER IN CASE. 
ME-OUT WHEN 


ADDRESSING THE KW11. 


THE 
— CLOCK DOES NOT RETURN 
"BUS SSYN” THEN WE’LL TIME-OUT 


; THE CLOCK WAS THERE! EXIT SUB-TEST. 


/ADD #4 TO STACK POINTER. 
;FOR ERROR TYPEOUT. 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SS$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 


le 


;REPORT ERROR=CLOCK CSR FAILED TO RETURN 
tNOTE: T 


YN" WHE! 

F PROGRAM HAS INCORRECT 
SS THEN WE MIG NOT BE 
;TALKING TO THE CLOCK. MAKE SURE 
OF CLOCK ADDRESS. 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


CO3 
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*TEST THE ADDRESSABILITY OF CLOCK CSR 


123 0024S0 012637 o00004 3S: MOV (SP)+, J8ERRVEC 
1238 
1239 : preep oT STEST THE PODRESSABILITY OF CLOCK BUFFER REG 
1240 TE #TEST THE ADDRESSABILITY OF CLOCK BUFFER REG. 
1241 A a 
ete 002454 o00004 téT2: SCOPE 
1244 
1245 002456 01374 O00004 1S: MOV JERRVEC,-(SP) ;SAVE CONTENTS OF ADDRS 6. 
124% O0e%62 012737 002476 OO0004 MOV #2$,d8ERRVEC  ;SET TIME-OUT TRAP VECTOR TO HANDLER IN CASE. 
1247 HS TIME-OUT WHEN ADDRESSING THE KW11. 
1248 002470 005777 176704 TST JABR "ADDRESS THE CLOCK! 
1249 ;1F CLOCK DOES NOT RETURN 
1250 :"BUS SSYN” THEN WE’LL TIME-OUT 
1252 002474 oOD0406 BR 3S ne CLOCK WAS THERE! EXIT SUB-TEST. 
1253 002476 2s: 
1254 002476 062706 oo0004 ADD #4, SP /ADD #4 To STACK POINTER. 
1255 002502 013737 001400 001420 MOV ABR, STMPO ;FOR ERROR TYPEOU 
1257 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1260 002510 104012 ERROR 12 sREPORT ERROR=CLOCK BUFFER REG. FAILED TO RETURN 
1261 -"BUS SSYN" WHEN ADDRESSED. 
1262 ‘NOTE: IF PROGRAM HAS INCORRECT 
1263 ‘ADDRESS THEN WE MIG NOT.BE 
1264 ‘TALKING TO THE CLOCK. MAKE SURE 
1265 OF CLOCK ADDRESS. 
iF 
; ; SSSSSSSSSSSSSSSSSSSSSSSS)>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1270 002512 012637 oco0004 3S: MOV (SP)+, J#ERRVEC 
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DVKWAB.P11 12 TEST THE ADDRESSABILITY OF CLOCK BUFFER REG. 


1276 HHH SHEE EERE EEEREREEEREEERE 
ieee jATEST 3 #TEST THAT CLOCK A STATUS REGISTER BIT 14 CAN BE SET AND CLEARED 
ism be elle BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
i ‘ ‘ 
icss 16 i RR en ee 
i 002520 012737 000100 001160 "MOV #100,STIMES ;;D0 100 ITERATIONS ; 
1287 002526 005077 176644 CLR dASR /CLEAR i. * STATUS REGISTER. 
1e88 002532 O52 O40000 176636 BIS #81714, dASR SET BIT 14. 
1289 002540 012737 O40000 001124 MOV #BIT14,SGDDAT ;/SET FOR ERROR TYPEOUT S/B. 
290 002546 017737 001126 MOV dASR, SBDDAT ;/READ THE STATUS REGISTEP. 
1291 002554 023737 O0112e4% 001126 CMP SGDDAT,SBDDAT ;/DID BIT 14 AND ONLY BIT i4 SET? 
ics O0eS62 001402 BEQ 1$ ;7IF SO-LETS TRY CLEARING IT. 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1296 002564 104002 ERROR 2 ;7ERROR CLOCK AS STATUS REGISTER 
34 ;/BIT 14 FAILED TO BIT SET. 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 

i 002566 000412 BR es ;/BR TO END SUBTEST. 
1303 002570 042777 OY4O000 176600 1S: BIC #81714, ASR ;7TRY CLEARING BIT 14. 
1304 002576 005037 001124 CLR SGDDAT :7CL EAR S/B FOR TYPEOUT IF ANY. 
1305 017737 176570 001126 MOV @ASR, SBDDAT ;/NOW_READ IT BACK. 
in 002610 001401 BEQ es ;/IF ZERO - NO ERROR! 
1308 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


1311 OO02@6i2 104002 ERROR 2 ;7ERROR - CLOCK A eit | REGISTER. 

1312 ;/BIT 14 FAILED TO JLEAR 

1313 
1314 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <S$$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS | 
002614 es: 


—— 
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DVKWAB.P11 T3 *TEST THAT CLOCK A STATUS REGISTER BIT 14 CAN BE SET AND CLEARED 


1320 
1321 pegunelaneansannetbennpennnenensansunnenssnesunensananensnnnnee 
1322 jATEST 4 ¥TEST THAT CLOCK A STATUS REGISTER BIT 13 CAN BE SET AND CLEARED 
1324 * SCLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
1325 j HF /FS OR GATES 
1359 . 
1328 os REE RHEERERSERRX RS RESRARESEA SALLE RLS ELE SRE MEST eHERRERELMEKE KA ELL ESE 
1329 002614 000004 tST4: SCOPE 
1330 002616 012737 000100 001160 #100, STIMES ;;D0 100 ITERATIONS 
1332 002624 005077 176546 CLR ASR -/CLEAR THE STATUS REGISTER. 
1333 002630 777 O20000 176540 BIS #81713, 2ASR */SET BIT 13. 
1334 002636 012737 001124 MOV #81713, SGDDAT ;/SET FOR ERROR TYPEOUT S/B. 
1335 002644 017737 176526 001126 MOV JASR, SBDDAT */READ THE STATUS REGISTER. 
1336 O026S2 023737 001124 001126 CMP SGDDAT , SBDDAT ;/D1D BIT 13 AND ONLY BIT i3 SET? 
1337 001402 BEQ 1$ :/IF SO-LETS TRY CLEARING IT. 
; s SSSSSSSSSSSSSSSSSSSSSSSS>>> mess ( ((SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1341 002662 104002 ERROR 2 ;/ERROR CLOCK AS STATUS REGISTER 
13Me :/BIT 13 FAILED TO BIT SET. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1346 002664 000412 BR 2s ;/BR TO END SUBTEST. 
1348 OO02666 042777 OP0000 176502 15S: BIC #81713, dASR :/TRY CLEARING BIT 13. 
1349 002674 005037 001124 CLR SGDDAT i /CLEAR S/B FOR Tyeedur IF ANY. 
1350 002700 017737 176472 001126 MOV ASR, SBDDAT 
1351 002706 001401 BEQ 2s VIF ZERO - NO ERROR! 
1353 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1356 002710 104002 ERROR 2 - /ERROR - CLOCK A STATUS REGISTER. 
1357 :/BIT 13 FAILED TO CLEAR. 
Ee 
: s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1362 002712 : 
1363 = 
1364 
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004000 
001124 
176374 


fiat fedcKA STATUS ReciSteR BIT 14 CAN BE SET AND CLEARED 


001160 


176442 
011 
0011 
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176404 
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A riititiiiittiriiitititiiitititiiititiiiittittetiit tt ett 
jATEST 5 #TEST THAT CLOCK A STATUS REGISTER BIT 11 CAN BE SET AND CLEARED 


t SCLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
jaF FS OR GATES 


4 a ne eee 
° #100, STIMES ;;D0 100 ITERATIONS 
CLR JASR : /CLEAR THE STATUS REGISTER. 
BIS aB1T11, 9ASR ; 7 BIT 
CMP SGODAT, SBDDAT wy, D he hus Fels TER SET? 
BEQ pet tae let Phy nD OLY BLT i 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ones << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 : ERROR AS STAT GISTER 
hii FAILED 8 BIT se > 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
BR 25 ;/BR TO END SUBTEST. 
1S: BIC #B1T11,aASR ;/TRY CLEARING BIT 
CLR SDDAT ie 5/8 FOR FOR TyPEOOT IF ANY. 
MOV , SBDDAT 
BEQ 2s :/IF ZERO - NO OPRROR! 


; » SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;7ERROR - CLOCK A STATUS REGISTER. 
;/BIT 11 FAILED TO CLEAR. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


2s: 
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176306 
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ee Te 
jATEst 6 ¥TEST THAT CLOCK A STATUS REGISTER BIT 6 CAN BE SET AND CLEARED 


; #CLOCK on cate REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
j8F/FS OR GATES 


; par - eanaapreaaanrcaaags atc pena nareeaammnatans re mien is 
y #100, STIMES ;;D0 100 ITERATIONS 
CLR JASR ;/CLEAR THE STATUS REGISTER. 
BIS BIT6, aASR :/SET BIT 6. 


#B1T 
MOV #BIT6,SGDDAT  ;/SET FOR ERROR TYPEOUT S/B. 
MOV JASR, $BDDAT ;/READ THE STATUS REGISTER. 

CMP SGDDAT, SBDDAT ;/D1D BIT & AND ONLY BIT 6 SET? 


BEQ 1$ ;/IF SO-LETS TRY CLEARING IT. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS> >> ERROR « ( (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;7ERROR CLOCK AS STATUS REGISTER 


:/BIT 6 FAILED TO BIT SET. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


BR 2 ;/BR TO END SUBTEST. 
1S: BIC -8BIT6, ASR /TRY CLEARING BIT 6. 

CLR scopaAt t7CLEAR S/B FOR TyPEOUT IF ANY. 

MOV JASR, SBDDAT :/NOW READ 

BEQ 2s IF ZERO - No ERROR! 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SS$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;7ERROR - CLOCK A status REGISTER. 
:/BIT 6 FAILED TO CLEAR 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2S: 
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#TEST THAT CLOCK A STATUS REGISTER BIT & CAN BE SET AND CLEARED 


- SeeeeedSSHHEEOEEEEEEEEESEESOEEEESOESEEAEEOSERESOEEOEEESESEEOSE 


jATest 7 #TEST THAT CLOCK A STATUS REGISTER BIT S CAN BE SET AND CLEARED 
t SCLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
ja 7 7FS OR GATES 
i re ener 
000100 001160 "MOV #100, STIMES ;:D0 100 ITERATIONS 
176254 CLR ASR s/CLEAR THE STATUS REGISTER. 
O00040 176246 BIS #B1TS,9ASR */SET BIT S. 
000040 001124 MOV #8175; SGDDAT ;/SET FOR ERROR TYPEOUT S/B. 
176234 001126 MOV JASR, $BDDAT */READ THE STATUS REGISTER. 
001124 001126 CMP SGODAT SBODAT 3/010 BIT S AND ONLY BIT S SET? 
BEQ 1S :/IF SO-LETS TRY CLEARING IT. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> aioe ((($SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 :/ERROR CLOCK AS STATUS REGISTER 


;/BIT S FAILED TO BIT SET. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


BR 25 ;/BR TO END SUBTEST. 
176210 1S: BIC #BITS, JASR ;/TRY CLEARING BIT 5. 
001124 CLR $GDDAT ; CLEAR S/B FOR TYPEOUT IF ANY. 
176200 001126 MOV JASR, SBDDAT */NOW READ IT BACK. 
BEQ 2$ */IF ZERO - NO ERROR! 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 2 ;7ERROR - CLOCK A STATUS REGISTER. 
:/BIT S FAILED TO CLEAR. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2s: 
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#TEST THAT CLOCK A STATUS REGISTER BIT © CAN BE SET AND CLEARED 
EE Ne 
jATES T 10 #TEST THAT CLOCK A STATUS REGISTER BIT 4 CAN BE SET AND CLEARED 
t SCLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
jaF/FS OR GATES 
ee Se ee 
000100 001160 "MOV #100, STIMES ;;D0 100 ITERATIONS 
176156 CLR ASR : /CLEAR THE STATUS REGISTER. 
176150 BIS #8174, ASR :/SET BIT 4 
000020 001124 MOV WBITY $CDDAT =; SET _FOR ERROR TYPEOUT S/B. 
176136 001126 MOV JASR, $BDDAT /READ THE STATUS REGISTER. 
001124 001126 CMP SGDDAT , SBDDAT 3/010 BIT 4 AND ONLY BIT 4 SET? 
BEQ 1S :/IF SO-LETS TRY CLEARING IT. 
; : SSSSSSSSSSSSSSSSSSSSSSSS>>> satin <( (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;/ERROR CLOCK AS STATUS REGISTER 


;/BIT 4 FAILED TO BIT SET. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


BR 23 ;/BR TO END SUBTEST. 
000020 176112 1S: BIC #BIT4, JASR ;/TRY CLEARING BIT 
001124 CLR scDpaAt ; CLEAR S/B FOR TYPEOUT IF ANY. 
176102 001126 MOV ASR, SBDDAT */NOW READ IT BACK. 

BEQ 2s :/IF ZERO - NO ERROR! 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;/ERROR - CLOCK A STATUS REGISTER. 
:/BIT 4 FAILED TO CLEAR. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2S: 
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#TEST THAT CLOCK A STATUS REGISTER rel 4 CAN BE SET AND CLEARED 


Fcc o rare rarer 


T ll *TEST THAT CLOCK A STATUS REGISTER BIT 3 CAN BE SET AND CLEARED 
to. 08 RIUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
i 
Re RR ne nen ane 
000100 001160 MOV #100, STIMES ;;D0 100 ITERATIONS 
176060 CLR ASR ;/CLEAR THE STATUS REGISTER. 
900019 17 BIS #8173, ASR */SET BIT 3. 
00001 1124 MOV #81T3, SGDDAT 5 /SET OR ERROR TYPEOUT S/B. 
176040 001126 MOV JASR, SBDDAT :/READ THE STATUS REGISTER. 
001124 001126 CMP SGDDAT , SBDDAT :7010 IT 3 AND ONLY BIT 3 SET? 
BEQ 1S TS TRY CLEARING IT. 
; s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;/ERROR CLOCK AS STATUS REGISTER 
:/BIT 3 FAILED TO BIT SET. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
BR 2s ;/BR TO END SUBTEST. 
000010 176014 1S: BIC #8173, JASR ;/TRY CLEARING BIT 3. 
001124 CLR SGDDAT ; “CLEAR S/8 FOR TYPEOUT IF ANY. 
176004 001126 MOV JASR, SBDDAT */NOW READ IT BACK. 
BEQ 2s :/IF ZERO - NO ERROR! 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;/ERROR - CLOCK A areTus REGISTER. 
:/BIT 3 FAILED TO CLEAR 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2s: 


KO3 
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DVKWAB.P11 Tll “TEST THAT CLOCK A STATUS REGISTER BI CAN BE SET AND CLEARED 


; Ce ee arora reenter ee rea 
Ate #TEST THAT CLOCK A STATUS REGISTER BIT 2 CAN BE SET AND CLEARED 


oe SET REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 


1590 
1591 
1592 
1593 
1594 
1595 a: 
ie ‘ 
3 i J Penge 4 ayaa L 
1600 003402 Bie737 000100 001160 #100, STIMES ;3D0 100 ITERATIONS 
1 003410 005077 175762 CLR JASR ; CLEAR THE STATUS REGISTER. 
1603 14 052777 000004 175754 BIS welt rDASR i/SET BIT 
tees 609430 Nae eee Bot NOV t7RERO. THE Eamon us REGISTER’ 
1606 003436 023737 001124 O0li26 CMP Scapa aOR :/DID BIT 2 AND ONLY BIT 2 SET? 
1607 003444 001402 BEQ 1$ :/IF SO-LETS TRY CLEARING IT. 

| ;  SSSSSSSSSSSSSSSSSSSSSSSS>>> oon << ($SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1611 OO3446 104002 bs ERROR 2 ; /ERROR STAT REGISTER 
ible BIT é FACED fo BIT 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 

161g 003450 ooo4W2 BR 25 ;/BR TO END SUBTEST. 
1618 OO34S2 042777 OD0004 175716 1S: BIC #8172, JASR ;/TRY CLEARING BIT 2. 
i 17737 T78706 001126 Ay ST coat UAH READ" TT BACK Agen, 
; 003472 001401 BEQ gern :/IF ZERO - NO ERROR! 
1 


; s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


104002 ERROR 2 ~ ;7ERROR - CLOCK A STATUS REGISTER. 
;/BIT 2 FAILED TO CLEAR. 


oe Seer seeks 
2? 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
003476 2S; 


——1 
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DVKWAB.P11 Tle #TEST THAT CLOCK A STATUS REGISTER ert can BE SET AND CLEARED 


CoRR eo 


Re ee 
jATEST 13 #TEST THAT CLOCK A STATUS REGISTER BIT 1 CAN BE SET AND CLEARED 


SECLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
j4F7FS OR GATES 


5-1 ial -b-+-+ ‘anata 

003476 oo0004 +6713: SCOPE 
003500 012737 000100 001160 MOV #100, STIMES ;;D0 100 ITERATIONS 
003506 005077 175664 CLR aASR ;/CLEAR THE STATUS REGISTER. 
003512 052777 175656 BIS #BIT1,9ASR ;/SET BIT 
003520 012737 O00002 001124 MOV #BIT1:SGODAT  ;/SET FOR ERROR TYPEOUT S/B. 
003526 017737 001126 MOV JASR, SBDDAT >/READ THE STATUS REGISTER. 
003534 023737 001124 001126 CMP SGDDAT , SBDDAT 70D BIT 1 AND ONLY BIT 1 SET? 
003542 001402 BEQ it} /IF SO-LETS TRY CLEARING IT. 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> omen < (< $SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
003544 104002 ERROR 2 ;/ERROR CLOCK AS STATUS REGISTER 

:/BIT 1 FAILED TO BIT SET. 

; s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
003546 o00412 BR 25 ;/BR TO END SUBTEST. 
003550 042777 OO0002 175620 1S: BIC #81T1,9ASR :/TRY CLEARING BIT 1. 
003556 001124 CLR SGDDAT */CLEAR S/B FOR TYPEOUT IF ANY. 
003562 017737 175610 001126 MOV JASR, SBDDAT 5 NOW READ IT BACK. 
003570 001401 BEQ 2$ /IF ZERO - NO ERROR! 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


003572 104002 ERROR 2 ;7ERROR - CLOCK _A STATUS REGISTER. 
;/BIT 1 FAILED TO CLEAR. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
003574 2s: 
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STATUS REGISTER BIT 1 CAN BE SET AND CLEARED 


ate arate ee eres 


peli #TEST THAT CLOCK A STATUS REGISTER BIT 0 CAN BE SET AND CLEARED 


#CLOCK gras REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
iar Fs OR GATES 


On gece aaa eaguamanee 1 sso resaemcamaamen capa mace ei 


té1 


MOV #100, STIMES ;;D0 100 ITERATIONS 
CLR ASR : Pane: THE STATUS REGISTER. 
Se eeehar «i SET FOR 
MOV aASR, $B0F IT t /READ US REGISTER” 
CMP SGoGAT SBODAT i/0 D ‘1D BIT “BIT 0 AND IT O° ET? 
BEQ 1S SO-LETS TRY DON Bir 

;  SSSSSSSSSSSSSSSSSSSSSSSS>>> aati (( (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;/ERROR CLOCK AS STATUS REGISTER 


;/BIT O FAILED TO BIT SET. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


BR 25 ;/BR TO END SUBTEST. 
1S: BIC #8170, 9ASR ;/TRY CLEARING BIT 0. 

CLR $copaAt */CLEAR S/B FOR TYPEOUT IF ANY. 

MOV JASR, SBDDAT 5 “NOW READ IT BACK. 

BEQ 2s :/IF ZERO - NO ERROR! 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <(SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;7ERROR - CLOCK A STATUS REGISTER. 
-/BIT O FAILED TO CLEAR. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
es: | 
-RADIX 8 


iresT igs STEST THAT PATERN 1oseu2 WILL SET AND CLEAR IN BU 


{TEST 1S *TEST T PATERN 12@S2Se WILL SET AND CLEAR IN BUFFER REG. 


| HeaadaeeavenatesteancusessssatesATGaHOACEAAEASOREEEOO HEINE 
1 e 


CLR dABR ;/CLEAR THE BUFFER REG. 
MOV #125252,SGDDAT ;/RECORD PATTERN: leSeSe . 


NO3 
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#22 ddadens 


bo at tes 


faddoaas 


eug 


a 


SERERERNSS orcs 


i 
Gf BGSs 


: 


T1S #TEST THAT PATERN 1eSeSe WILL SET AND CLEAR IN BUFFER REG. 


003706 ise? 001124 175464 MOV T,. JABR ;/SET PATTERN IN BUFFER REG. 
003714 Bl 37 175460 001126 MOV SBR SODA ;/READ THE BUFFER REG. 
3737 001124 001126 CMP SGDDAT , SBDDAT UE THE PATTERN ag OK? 
1402 BEQ 1$ S-TRY CLEARI 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <(SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


104003 ERROR 3 ;7ERROR PATTERN 125252 FAILED TO 
;/SET PROPERLY IN BUFFER REG. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


000412 BR 2s ;/GOTO SCOPE LOOP. 
042777 125252 175434 15: BIC #125252, JABR ;/TRY CLEARING PATTERN. 
001124 CLR SGDDAT ; “EXPECT ZERO BACK. 
017737 175424 001126 MOV “@ABR, SBDDAT ;/READ BUFFER REG. ,WAS IT ZERO? 
001401 BEQ es ;/YES-NEXT TEST. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


104003 ERROR 3 ;/BUFFER REG. COULD NOT BE LOADED 
:/TO A ZERO. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <(SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
es: - 
[HEP Herero rere renreneceneenesienenseninies 
pseu 16 -#TEST THAT PATERN OS2525 WILL SET AND CLEAR IN BUFFER REG. 
vplpaskbcecnabinabbaanenamnantenantarttertitattceoteitionsiot 
ooo004 téTi6: SCOPE 
005077 175410 CLR ABR ;/CLEAR THE BUFFER REG. 
012737 052525 001124 MOV #052525, SGDDAT ; “RECORD PATTERN: OS2Se25 . 
013777 001124 175374 MOV SGODAT, dABR */SET PATTERN IN BUFFER REG. 
017737 175370 00112 ~~ MOV ABR, SBDDAT :/READ THE BUFFER REG. 
023737 001124 001126 CMP SGDDAT,SBDDAT  ;/DID THE PATTERN SET OK? 
001402 BEQ 1s. :/YES-TRY CLEARING IT. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
104003 ERROR “3 ;/ERROR PATTERN O0S2S25 FAILED TO 
:/SET PROPERLY IN BUFFER REG. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
000412 BR 2s “= ;/GOTO SCOPE LOOP. 


MAINDEC-11-DVKWA-B 
DV; Pll T16 


4 


Cand edad eed eek ee eet ed a 
atetatetetettetetot=tat=t=t=tat=| a iP 


RECN SOOO TOROS 


Boe 


J 
oo 
a 
_ 


o040Se 
0040S4 


004122 


042777 


005037 
017737 
001401 


104003 


000004 
012737 


005077 
112777 


017777 
013737 
10037 


105737 
001401 


104001 


MACY11_27(665) 21-FEB-77 14:43 PAGE 40 
#TEST THAT PATERN OSeSeS WILL SET AND CLEAR IN BUFFER REG. 


OS2S2S 175344 1S: BIC #052525 , JABR TRY CLEARING PATTERN. 
001124 : CLR $GDDAT {EXPECT ZERO BACK. 
175334 001126 MOV @ABR, SBDDAT */READ BUFFER REG. “WAS IT ZERO? 
BEQ es : /YES-NEXT TEST. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 3 seeres REG. COULD NOT BE LOADED 
;/T0 A ZERO. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS> >> pani «< ($SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2s: 
-SBTTL # 
-SBTTL # PHASE 2 ADVANCED BASIC LOGIC TESTS 
-SBTTL # 
+ EERELERREEL ELLE SELLER A EEE ELLE EEE AAA REELS E AE RE REL EL EE EE 
TEST 17 #TEST THE LOW BYTE OPERATION OF CLOCK’S STATUS REGISTER 
SWE CAN SUCCESSFULLY WRITE EVERY BIT IN STATUS REG A 
jaa LETS CHECK THE BYTE OPERATION OF THIS REGISTER. 
gjgtyeeepeenpeeeeesaneeeeeenaoeeeeesnneneeenaneneeeesaeceeenaa 
oo0o00SO 001160 MOV #50,STIMES ;;00 SG ITERATIONS 
175310 CLR a@ASR ;MAKE SURE THE STATUS REGISTER IS CLEAR. 
127677 175302 MOVB #127677, dASR : TRY WRITING ALL BITS IN THE 
i STATUS REGISTER. LOGIC SHOULD PREVENT IT 
;FROM BEING WIT fen INTO BECAUSE 
;WE ARE USING A DATOB INSTRUCTION. 
175276 175024 MOV dASR, JSBDDAT ;NOW EXAMINE THE 
i STATUS REGISTER. 
001126 001124 MOV SBDDAT,SGDDAT  ;FIX SGDDAT FOR ERROR TYPEOUT IF 
001125 CLRB SGDDATS1 s;ANY RROR HAS OCCURRED, UPPER BYTE CLEARED. 
001127 TSTB SBDDAT+1 ;ARE_ ANY BITS IN THE UPPER BYTE 
: OF THE STATUS REGISTER SET? 
BEQ 1$ : BRANCH NEXT TEST IF UPPER BYTE=0. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< S$S$S$SSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 1 ;ERROR - WROTE INTO UPPER BYTE OF 


pit Th MACY11 27(665) 21-FEB-77 14:43 PAGE 41 
DVKWAB. P T17 ¥"EST THE LOW BYTE OPERATION OF CLOCK’S STATUS REGISTER 


1842 sCLOCK’S STATUS WHEN 
oud ‘DOING A DATOB TO THE LOW BYTE. 
1845 

5  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1848 004124 1S: 
18S0 ; See TET MTME HiGH BYTE OPERATION OF A'S STATUS REGIS 
1881 TE ¥TEST THE HIGH BYTE OPERATION OF A’S STATUS REGISTER 
1853 
1854 ’ SME CAN SUCCESSFULLY WRITE EVERY BIT IN STATUS REG A 
1855 ; #NOM LETS CHECK THE BYTE OPERATION OF THIS REGISTER. 
1857 " 
i 004124 nS a en ee 
1860 004126 Boa? 000050 001160 MOV #50, STIMES ;;D0 50 ITERATIONS 
186 004134 005077 175236 CLR ASR ;CLEAR THE STATUS REGISTER. 
1864 004140 005237 001376 INC ASR ;ADD #1 TO THE STATUS REGISTER’S ADDRESS 
1865 *SO THAT WE WILL BE WRITING INTO 
1866 :THE HIGH BYTE. 
1868 OO4144 112777 177313 175224 MOVE  #177313,9ASR = ; TRY WRITING ALL BITS IN THE 
1869 "REGISTER. LOGIC SHOULD PREVENT THE LOW 
1870 *BYTE OF THE STATUS REGISTER 
1871 *BEING WRITTEN INTO BECAUSE WE ARE USING 
187¢ A DATOB INSTRUCTION WITH AOO SET. 
1874 904152 005337 001376 DEC ASR iEIX QODRESS oof THE STATUS REGISTER ADDR. 
1876 004156 017737 175214 001126 MOV ASR, SBDDAT *READ BACK WHAT THE STATUS REG. CONTAINS 
He Sues Uy lige Coes ame SORT GEE Re pee arge Geme, 
1879 004176 105737 001126 TSTB  $BDDAT 71S LOWER BYTE CLE 
1880 oo4202 001401 BEQ 1$ BR IF YES TO NEX’ SUBTEST. 
1882 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << ( SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1885 004204 104001 ERROR 1 ;ERROR - WROTE INTO LOWER BYTE 
1886 OF CLOCKS STATUS REGISTER WHEN 
1887 DOING A DATOB TO THE HIGH BYTE. 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSESSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1891 004206 1S: 
1892 


j joupenpneuannnonsosesndonenesanenessonseveatonuetessssssonnesess 
;#TEST 21 *TEST CLOCK’S COUNT REGISTER WITH 125252 PATTERN 
eTitirtir iti iiitiiittitittititiiiiiiirrititiiiiittirs ities 


RES 
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DVKWAB.P11 Tel #TEST CLOCK’S COUNT REGISTER WITH 125252 PATTERN 


WAB. 
18% O04206 O00004 TST21: SCOPE 
1897 004210 012737 000100 001160 MOV #100, STIMES ;;D0 100 ITERATIONS 
1899 004216 005077 175154 CLR ASR ;SELECT MODE O. 
1900 O04222 012777 125252 175150 MOV #125252,3ABR § ;LOAD THE BUFFER REGISTER WITH 
1901 : PATTERN Lesese. WILL BE 
1902 :T 5 THe COUNT REGISTER 
1903 *SINCE THIS I CO NObE 0. 
1904 004230 052777 000001 175140 BIS #B1T0, 2ASR *SET GO BIT(ALLOWS BUFFER-COUNT REG XFER). 
1906 004236 012737 125252 001124 MOV #125252,$GDDAT ;SET EXPECTED TO PATTERN IN CASE OF 
1907 "NEED OF ERROR TYPEOUT. 
1908 O04244 01774 175126 MOV - :/SAVE CSR 
1909 004250 011637 001424 MOV (6) (6), $THP3 :/GET CSR. 
1910 004254 042737 177707 001424 BIC #177707,$TMP3._:/SAVE RATE BITS. 
1911 O04262 052737 Oo400S 001424 BIS #BIT11! Mare BITO’ STMPS ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
1912 004270 013777 001424 175100 MOV STMP3, aA 
1913 ;/THIS nist BE DONE IN 
1914 */ 0 XFERR COUNTER 
1915 :/T0 BREFeR ON STe. 
1916 004276 052777 991009 175072 BIS #81T9, JASR ; “GENERATE ON STe2 PULSE 
1917 004304 017737 175070 O01126 MOV JABR, $BDDAT */READ THE PRESET BUFFER, 
1918 */PREVIOUS COUNTER 
1919 004312 012677 175060 MOV (6)+, JASR */CONTENTS ARE IN SBDDAT. 
1320 004316 005737 001126 TST SBDDAT : /RESTORE CSR 
1922 004322 023737 001124 001126 CMP SGDDAT , SBDDAT 3010 A ALL L THE 8 BITS AND NO OTHER BITS 
1968 004330 061401 BEQ 1$ :BR IF es TO NEXT TEST. 
1926 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1929 004332 104005 ERROR 5S sDATA ERROR CLOCK - PATTERN “125252” 
1930 ‘FAILED TO TRANSFER PROPERLY BETWEEN 
1931 *BUFFER AND COUNT REGISTERS. 
1933 
; s SSSSSSSSSSSSSSSSSSSSSSSS)>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1996 004334 18: 
1938 2 LKEEKELA KLAR ELSE EK KEL ERE LE LER EME REEL ERER ELE SE RES REESE GES CEER EERE 
1939 ETEST 22 ¥TEST CLOCKS COUNTER REGISTER WITH OS2S25 PATTERN 
1940 + et —--+-+ aati 
1941 004334 000004 jures COPE 
ave 004336 012737 OO00SO 001160 MOV #50, STIMES ;;D0 SO ITERATIONS 
1944 004344 005077 175026 CLR aASR ;SELECT MODE 0. 
1945 0043S0 012777 052525 175022 MOV #052525,9ABR § ;LOAD THE BUFFER REGISTER WITH 
1946 ; PATTERN 052525. LL 
1947 NSFERRED TO THE COUNT REGISTER 
1948 SINCE THIS IS MODE 0. 
1949 004356 052777 000001 175012 BIS #8170, JASR *SET BO BITCALLOWS BUFFER-COUNT REG XFER). 


E04 ~ 
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DVKWAB.P11 Tee #TEST CLOCKS COUNTER REGISTER WITH OSeS2S PATTERN 


1950 
1981 004364 012737 OS2525 001124 MOV 8052525, SGDDAT ;SET EXPECTED. T9 PATTER: IN CASE OF 
1953 004372 017746 175000 HOV om ; “SAVE csr ‘ 
1954 004376 O11 001424 (6) 1, i/ T 
1955 004402 042737 177707 001424 Bre STMP3 {SAVE RAT BITS. 
1956 004410 052737 O0400S 001424 BIS ea ht ST ySET MODE 2, NO RATE,DISABLE INTERNAL OSC 
1957 004416 013777 O01424 174752 STMP3, /LOAD CSR. 
1958 :/THIS MIST BE DONE IN 
166 OG BUFFER ON SToee 
1961 004424 052777 001000 174744 BIS #81T9, JASR */GENERATE ON ST PULSE 
196¢ 004432 017737 174742 001126 MOV ABR, $BDDAT j READ THE PRESET BUFFER, 
1964 OO444O 012677 174732 MOV (6)+, 9ASR - T7CONTENTS ARE IN SBDDAT. 
1965 004444 005737 001126 TST SBDDAT : /RESTORE CSR 
1967 OO44SO 023737 001124 001126 CMP SGDDAT, SBDDAT i010 1D ALL THE 8 BITS AND NO OTHER BITS 
1969 OO44S6 001401 BEQ 1$ BR IF YES TO NEXT TEST. 
1971 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR (< (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1974 OO4460 104005 ERROR 5 DATA ERROR CLOCK - PATTERN “O0S2525" 
1975 FAILED TO TRANSFER PROPERLY BETWEEN 
197% BUFFER AND COUNT REGISTERS. 
1978 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


1981 o04462 1S: 
i 

1984 + SEEKERS K EELS SEK A RASA AAR S AERA RA ARE RSSESERA AAA KA LERKAAEREELS 

1385 HW EST 23 #TEST THAT INIT CLEARS STATUS REGISTER 

1987 :*TESTING OF THE INIT LOGIC AS RECEIVED FROM THE QBUS AND BUFFERED 
1988 ;470 STATUS REGISTER F/FS. 

1390 © enucenneuasecuausaseucsseeuusasseuapesceuceuanqunsususeseueusse 

1991 oOO4462 OD00004 qgeene SCOPE 

199¢ 004464 012737 OO0000S 001160 MOV #5, STIMES ;;D0 S ITERATIONS 

1994 004472 005037 001124 CLR SGDDAT EXPECTED DATA IS ZERO. 

1995 004476 012777 177777 174672 MOV #177777,0ASR | ;SET ALL BITS IN THE STATUS REG. 

1997 o04s04 oo0cos RESET -SYSTEM INITIALIZE. 

1999 OO4SO6 017737 174664 001126 MOV ASR, SBODAT ;READ THE STATUS REG., ALL BITS SHOULD 
2000 ‘HAVE BEEN CLEARED BY’ INIT. 

2001 004514 001402 BEQ 1$ . }BR IF YES TO NEXT TEST. 

2003 
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#TEST THAT INIT CLEARS Status REGISTER 
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; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 2 ;ERROR - SYSTEM INIT FAILED TO CLEAR 
“STATUS REGISTER CLOCK A 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
BR =°~=—sS‘TST24 An 
Ist ; TEST EXTERNAL SIGS? 
aI 'BITI2¢BIT! E T1,ST2 TO LATCH. 
F BQjenas eRe OBR Sek 
BEQ TSt24 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> one (( (SS$SSSSSSSSSSSSSSSSSSSSSSSSSSSS5 


ERROR 6 ; INIT FAILED TO CLEAR 
;5T1,ST2, AND/OR OVERFLOW 


; s SESSSSSSSSSSSSSSSSSSSSES: >> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
52 MSE gE SE HEE 6 9 9 

pATEST 24 #TEST THAT INIT CLEARS BUFFER REGISTER 

saTHES TEST IS DESGNED TO SEE IF “INIT H™ 


;*#CLEARS THE BUFFER REGISTER. WE ALREADY 
; BKNOW IT CLEARS THE STATUS REG. 


I 
ageent SCOPE 
#5, STIMES ;;D0 S ITERATIONS 
CLR SGDDAT sCLEAR EXPECTED DATA 
MOV #177777,0ABR § ;SET ALL BITS IN THE BUFFER REGISTER. 
RESET ; ISSUE SYSTEM INITIALIZE. 


MOV @ABR , SBDDAT ;READ THE BUFFER REGISTER, ALL SITS 
;SHOULD HAVE BEEN CLEARED’BY INIT. 
BEQ 1§ ;BR IF YES TO NEXT SUBTEST. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <$$S$SSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 3 ret ~ SYSTEM INIT FAILED 
0 CLEAR BUFFER REGISTER A. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
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*#TEST THAT INIT CLEARS BUFFER REGISTER 


GO4 
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1$: 
TST EXS sTEST EXTERNAL SIGS? 
BEQ TST2s 
BIS eBIT11erT12¢81T10, QOR2 ;ENABLE THEM 
© SELAERAAREKA BRERA RERA RELA AA LEAAALAEASLAERALRR ARERR A RSE RE SERA ASREEEE 
TEST 25 ¥TEST THE SETTING OF MAINTENANCE ST2 IN CLOCK BIT 15 TO SET 
« LRLAEERERERSRAEAERRRAERSEA LH RERE KARE E RARE AEA ARE SERRE REESE ASE REESE 
+éT25: SCOPE 
#1 ;SET THE GO BIT(ENABLES ST2 TO SET FLG). 
BIS sat79 JASR *SET MAINTENANCE STe. 
TST ASR ;DID BITIS (ST2 FLAG) SET? 
BMI 1$ ‘BR IF YES - NEXT TEST 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 1 ;ERROR - MAINTENANCE STe (BITS) 
;DID NOT SET BITIS (ST2 FLAG). 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
BR TST26 


1S: TST EXS ‘TEST EXTERNAL SIGNALS? 
BEQ TST26 33 
BIT #81T2,aDR 01D EXTERNAL ST2 GET SET? 
BNE TST26 3 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 6 ;ST2 OUT NOT DETECTED 
;BY TESTOR 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


5 Me ME MEME MEH EE SEE EE HE HEE HE HA ME EE EE EEE EEE EERE 
i ktest 26 *#TEST THAT BITOO IN CLOCK STATUS REG. WILL SET WHEN BIT13 AND MAIN. STe 
; | aut eanennenneabansanestnaedneniaanatEanESASRiMEANEATEIAED 


MOV 81713 ASR ;SET “ST2 ENB COUNTER” IN CLK STATUS REG. 
1T9. SASR j GENERATE A MAINTENANCE ST2. 

BIT SB 700 aASR 330 BIT 00 (GO) SET? 

BNE 1$ IF YES - NEXT TEST. 

;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <(SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 1 ;ERROR - BITOO OF CLOCK’S STATUS REGISTER 


HO4 
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PAGE 46 
Teb #TEST THAT BITOO IN CLOCK STATUS REG. WILL SET oan BIT13 AND MAIN. ST2 


;FAILED TO SET WHEN BIT13 WAS SET 
sAND A MAINTENANCE ST2 GENERATED. 


; ; SSSSSSSSSSSSESSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


004722 005077 174450 1S: CLR ASR ;LEAVE SUBTEST WITH CLOCK CLEAR. 
-SBTTL # 
.SBTTL #PHASE 3 COUNT TESTS 
-SBTTL # 
s KHER LA RAL EEER AA RA LESS LAA AAS E ARAL ARASH KAAS L ALES R AAS SSE 
i ETEST 27 #TEST TO SEE IF THE COUNTER WILL INCREMENT 
os KEKEEEEEEAEELERRE ALLELE RAL AALE RASA ALLA ARRAS RA SARA RELR SR KLES 
004726 oo0004 t$127: SCOPE 
004730 005077 174442 CLR aASR ;CLEAR THE CSR. 
DONPaG DSSt77 Abdde! 174430 ee esarrwgit, SON eT CETL. 00 
004746 052777 OOO400 174422 BIS #8178, JASR sGENERAT EA neinrehance STl. 
004754 017746 174416 MOV JASR, -(6) */SAVE CSR 
004760 011637 001424 MOV (6), $TMP3 ;/GET CSR. 
004764 042737 177707 001424 BIC #177707, STMP3 _: SAVE RATE BITS. 
004772 052737 001424 BIS #BITI1'BITC!BITO,STMPS ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
013777 001424 174370 STMP3, JASR */L SR. 
;/THIS MUST BE 
:/ORDER TO XFERR COUNTER 
:/TO BUFFER ON STe. 
001000 174362 BIS #B1T9, JASR ;/GENERATE ON ST2 PULSE 
005014 017737 174360 001126 MOV ABR, $BDDAT :/REOD THe T PRESET T BUFFER, 
o0s022 012677 174350 MO (6)+, MASR CONTENTS aye ARE TN IN SBDDAT. 
005026 005737 001126 TST A STORE C 
005032 001001 BNE 1S TES, NEXT TEST. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <(SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
005034 104006 ERROR 6 ;CLOCK FAILED TO INCREMENT. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
005036 1S: 
s 10 eee ng ey ag a ae 
; TE ¥SEE IF CLOCK WILL COUNT UP FROM A ZERO BASE, RATE:ST1 
i NOTE: IN THIS TEST LOOP ON ERROR WILL CAUSE A LOOP 
1 ON THE FAILING COU T Pat TERN 
ti LOOP ON TEST L START THE TEST 
ii FA CLOCK FROM itd TO THE FAILING COUNT. 


104 
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CLOCK WILL COUNT UP FROM A’ ZERO BASE, RATE: ST1 
“7° °° _pempamaanaametene santas ameuaeamammmeennnn tie. 


000004 - tét30 


012737 000010 001160 "MOV #10, STIMES ;;D0 10 ITERATIONS 
005077 174324 CLR aASR ; CLEAR THE CSR. 
005077 174322 CLR JABR CLEAR THE BUFFER REG 
012737 000000 001124 MOV #0, SGDDAT CLEAR EXPECTED. 
012737 O00S226 001110 MOV #2$, SLPERR 
052777 000061 174276 1S: BIS #BITS!BIT4!BITO,SASR ;START CLOCK, RATE:ST1. 
052777 000400 174270 BIS #B1T8, 2ASR ;GENERATE A MAINTENANCE STI 
*CLOCK SHOULD COUNT ONCE. 
005737 001440 TST EXS TEST EXTERNAL SIGNALS? 
001406 BEQ 10$ 
oo0002 174272 BIT #81T1,30R tYES - DID ST1 GET SET? 
001002 BNE 10 :YES 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
104006 ERROR 6 ;ST1 OUT NOT DETECTED 
:BY TESTOR 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
000447 a BR TST31 33 
01774 174242 “mov QASR, -(6) ; “SAVE CSR 
011637 001424 MOV (6), $TMP3 >/GET CSR. 
2737 177707 001424 BIC #177707,$TMP3 :/SAVE RATE BITS. 
37 0400S 001424 BIS #BI1T TLtAIT2!B1T0° STMP3 ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
013777 001424 174214 MOV STMP3, JASR 
;/THIS MST BE DONE IN 
>/ORDER TO XFERR COUNTER 
:/TO BUFFER ON ST2. 
777 OO1000 174206 BIS #81T9, JASR >/GENERATE ON ST2 PULSE 
017737 174204 001126 MOV ABR, SBDDAT ;/READ THE PRE FER, 
:/PREVIOUS COUNTER 
012677 174174 MOV (6)+, 9ASR */CONTENTS ARE IN SBDDAT. 
005737 001126 TST SBDDAT ;/RESTORE CSR 
37 001124 INC SGDDAT :COUNT=OLD COUNT+ 
023737 001124 001126 CMP SGDDAT,SBDDAT  ;COUNT READ=COUNT 1 MPrED? 
1402 BEQ 2s *YES - SEE IF WE’RE THROUGH. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
104011 ERROR 11 ;CLOCK FAILED TO COUNT UP PROPERLY. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
000410 BR 3$ ;GOTO SCOPE LOOP. 
005077 174144 2s: CLR ASR 
913777 O01124 174140 MOV $GDDAT, JABR 


005360 


oo0004 
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“SEE IF CLOCK WILL COUNT UP FROM A ZERO BASE, RATE:ST1 


001124 TST SGDDAT sALL_DONE? 
- BNE 1$ "NO DO NEXT INCREMENT. 
o  PREELEERREE SALARY MERRAELELS SRA SRRURPSLARSYALALHAYSLLLEL SEERA ERASE 
jATEST 31 ¥TEST THAT OVERFLOW (CSR BITO7) WILL SET ON OVERFLOW 
oXPERKEKE EEL ERS LEX LYS SELE LEK AKERS SH SE SERS LE RELL L HE ELLE ER EA LE RKEEE 
+6731: SCOPE 
001440 TST EXS TESTOR MODE ENABLED?? 
BEQ 2s *NO-THEN SKIP NEXT SECTION OF CODE. 
170500 CLR 38170500 ;CLEAR TESTOR A/D 
170502 TST 98170502 *DUMB READ OF A/D BUFFER. 
000040 170500 BIS #BITS,98170S00 ENABLE EXTRENAL START OF A/D. 
000010 io MOV #8. ,RO *SET TIME OUT NUMBER. 
174072 . CLR ASR CLEAR THE CSR 
177777 174066 MOV #-1, ABR SET PRESET BUFFER TO ALL ONES. 
000061 174056 BIS #BITS!BIT4!BITO,AASR ;START CLOCK, RATE ST1. 
000400 174050 BIS #8178, JASR ; COUNT CLOCK C ONCE, OVERFLOW 
174044 TSTB  @ASR ‘DIO OVERFLOW SET? 
BMI 1$ YES - THEN NEXT TEST 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 6 ;ERROR - OVERFLOW, CSR BITO? 
*FAILED TO SET ON’ OVERFLOW 
BR TST32 : 
001440 1S: iT XS test EXTERNAL SIGNALS? 
170500 TSTB 8170500 tr OVERFLOW GOT OUT, IT GAVE A/D START 
*WE’RE LOOKING FOR A/D DONE-DID IT GET SET? 
BMI TST32 : 
DEC RO ‘AID WE ALLOW ENOUGH TIME?? 
BNE 1$ :NO-THEN WAIT. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <(SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 6 ;OVERFLOW OUT NOT DETECTED 
*BY TESTOR 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


| a eer go en OE a 
tATEST 32 ¥TEST THAT OVERFLOW WILL CLEAR THE GO BIT 
; jj sesessdessevunenssucssseosecessnnessssesssesecesueeusesuaneese 
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THAT OVERFLOW WILL CLEAR THE GO BIT 
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@ASR ;CLEAR THE CSR. 

#-1, JABR ;PRESET CLOCK TO -1. 
#BITS!BIT4!BITO,9ASR ;START CLOCK, RATE:ST1 
#BIT8, JASR ;COUNT ONCE 


RFLOW 
: SHOULD OEEOR CE CLEARING 
ENABLE (CSR BITOO) 


#81TO,dASR ;D1D THE ENABLE CLEAR? 
1§ ;YES - NEXT TEST. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 6 TO CLEA OVERFLOW FAILED 


1§: 


CLEAR ENABLE (CSR BITOO) 


et a aieat than aa fat fant nor ee ee 


733: 
cur 
V 
BIS 
BIS 
BIT 
BNE 


T GO BIT DOES NOT CLEAR ON OVERFLOW, IF MODE 1 


ST 33 #TEST THA 
| pees Rieansanattattansseateansnvensaesnnenientenseveaveniebenye 


dASR AR _T 
1,088 PRESET BUFFERZONE COUNT FROM OVERFLOW. 
#63, JASR ; MODE l, RATE:ST1, GO. 


#8IT8,dASR ;GENERATE MAINTENANCE ST1. 


#BIT0,dASR . ;DID ENABLE (GO BIT) CLEAR? 
1§ 3NO (GOOD) NEXT TEST. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS> >> ERROR ¢ CC SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 6 ;G0 BIT CLEARED ON OVERFLOW 


;WHEN MODE 1 WAS SELECTED 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


18: CLR 


; i TEST 34 


dASR ;CLEAR THE CLOCK. 


Leet bee teat at nen tie a ce te a ee 


#TEST THE ABILITY OF CLOCK TO COUNT AT IMHZ RATE 


rT} 
:#THIS TEST IS DESIGNED TO TEST THE CLOCK’S ABILITY 


F3 
5 
Oo 


auerey sy 


ir 
~~ 


RRB 


Saar | 
aa 


wv 
bs 
Bae ee 
j 


005614 


OOS616 


MACY11_27(665) 
#TEST THE ABILITY OF CLOCK TO COUNT AT IMHZ RATE 





173554 


173656 


LO4 


21-FEB-77 = 14:43 SO 


j#70 COUNT AT IMHZ RATE. 


{SRANAEaeaaeaneneeaeeueaneneenenaenaeeneaneneneaneaeenteaeenty 
#5, STIMES ;;D0 S ITERATIONS 
CLR ASR ;/CLEAR 
CLR JABR * /CLEAR Sheser BUFFER 
MOV #81TO! 10, 2ASR aie CLOCK, MODEO, RATE: 1MHZ 
CLR RO WE'LL DO A LITTLE DELAY. THIS DELAY 
1S: INC RO ated AMOUNT TO APPROXIMATELY 
BNE 1S ;/369 MS. 
MOV JASR, -(b) ig obs 
MOV (6). $TMP3 
BIC #177707, STMP stp 3 sie Rig “Rate ITS. 
1S #BITL18IT2! 170° g MODE 2, NO RATE,DISABLE INTERNAL OSC 
MOV STMP3, JASR she 7. 6eD CSR. - 
/ORDER TO xPERR COUNTER 
-/TO BUFFER ON STe. 
BIS #81T9, JASR ;/GENERATE ON G PULSE 
ABR, SBDDAT >/READ THE PRESET BUFFER, 
/PREVIOUS COUNT 
(6)+, JASR */CONTENTS ARE IN SBDDAT 
TST SBDDAT ; /RESTORE 
2 /YES - NEXT TEST. 
TSTB 0s -2(6) :/AT HIGH RATE MAY HAVE HAD OVERFLOW 
yey : CSR HAD BEEN PUT ON STACK. 
BMI 2s “TEST IF OVERFLOW. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 6 ;/CLOCK FAILED TO COUNT AT 
; RATE: 1MHZ 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


es: CLR dASR ;/CLEAR THE CLOCK. 


5 ER 26362 9 9 9 9 9 a a a a a a a 
SATEST 38 #TEST THE ABILITY OF CLOCK TO COUNT AT 100KHZ RATE 


OE TEST af pps Desig My TEST THE CLOCK’S ABILITY 


SSE eee an aaa ee ee oenaeaeneeenneeneeee 
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he pao 
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000095 


MO4 


27(665) 21-FEB-77 14:4 51 
THE ABILITY OF CLOCK TO 3° COUNT nt 100KH2 RATE 
TST3S: SCOPE 
001160 MOV #5, STIMES ;;D0 S ITERATIONS 
CLR aASR ; 
CLR JABR +/ PRESET 
173526 MOV #81T0!20, 3ASR START CLOCK RATE: 100KHZ 
CLR RO >/NOW WE’LL DO A LITTLE . THIS DELAY 
1S: INC RO ;/WILL AMOUNT TO APPROXIMATELY 
BNE 1S :/369 MS. 
MOV BASR, -(6) ; 
MOV (6) THF : 
001424 BIC #1 ™P3 : ony RATE BITS. 
001424 1S berritiahreervors MODE 2, NO RATE,DISABLE INTERNAL OSC 
173466 MOV STMP3, JASR in : 
;/THI nbs BE IN 
3/ 0 C 
173460 BIS #BIT9.9ASR ior ON Sou ce 
001126 MOV aABR, SBDDAT ;7READ oe ¢ BUFFER, 
MOV (6)+, ASR + / ARE IN SBDDAT. 
TST SBDDAT : 
BNE : TEST. 
TSTB 0-26) AT YIGH RATE MAY HAVE HAD OVERFLOW 
NOTE: C HAD BEEN PUT ON STACK. 
BMI 2s 1 7NE TEST IF OVERFLOW. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 6 s/CLOCK FAILED TO COUNT AT 
+ “RATE: LOOKHZ 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2S: CLR ASR s/CLEAR THE CLOCK. 
os EREREX ELE SHRM EL ESLE RELA RHA AE SS SE LE XS KA SE ALLEL LEA URE KE RL EKER ELS 
TEST 36 ¥TEST THE ABILITY OF CLOCK TO COUNT AT 1OKHZ RATE 
iATHIS TEST IS DESIGNED TO TEST THE CLOCK’S ABILITY 
;470 COUNT AT LOKHZ RATE. 
; | AeReeneanereaneneeneaceneenenenceenceaenaenenaeaneeecenaens 
001160 MOV #5, STIMES D0 5 ITERATIONS 


C-11-DVKWA-B MACY11_27(665) 2 “77 14:43 
Pil ' HE ABILITY OF CLOCK TO COUNT count AT i 


T36 #TEST T 
005762 005077 173410 CLR ASR s /CLEAR 
o0s77¢ nie iraase 173376 st rt T0130 ASR i BR Mies a Bb RODED,, BR 
005000 CLR OD, tens Me TG BEEP ae furs DELAY 
06008 005200 1S: INC RO ;/MI QHOUNT TO APPROXIMATELY 
301376 BNE 1 :/36 
1 173364 MOV JASR, -(6) ; /SAVE CSR 
Goeots Ol fea? boiaed MOY CES ETHE i7eer 
00601 2737 177707 o01424 BIC #177707, STMP3 TE BITS 
oob0e4 050737 004005 001424 BIS eB1T11 2611218170, STNP Wy MODE 2, NO RATE,DISABLE INTERNAL OSC 
13777 001424 173336 MOV STMP3, JASR 54h SR. 
;/THIS MUS DONE IN 
: TO COUNTER 
:/TO BUFFER ON STe. 
p06040 052777 001000 173330 BIS #B1T9, JASR ;/GENERATE ON STe PULSE 
017737 173326 001126 MOV ABR, $BDDAT i/REBD T PRESET BUFFER, 
goB0s4 012677 173316 MOV (6)+, JASR + CONTEN ONTENTS ERE a: IN SBDDAT. 
G poiaes ote LE ail WES o HEXT TEST. 
BOEEEE 105766 177776 a F 306) at HIGH H RATE MAY HAVE HAD OVERFLOW 
CSR HAD BEEN PUT ON STACK. 
006072 100401 BMI 2s NE “TEST IF OVERFLOW. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
006074 104006 ERROR 6 ;/CLOCK FAILED TO COUNT AT 
+ /RATE: LOKHZ 
;  SSSSSSSSSSSSSSSSSSSSSSSS)>> one < ( (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
006076 005977 173274 2s: CLR JASR ;/CLEAR THE CLOCK. 
5 iteel ah STEST THe TUT ee ee AREEKFREREKES 
:&TES #TEST THE ABILITY OF CLOCK TO COUNT PT IKHZ RATE 
; jeTurs TEST IS DES DESIGNED TO TEST THE CLOCK’S ABILITY 
COUNT A 
[COR een 
102 pogo jit : 
104 012737 O00005 001160 MOV #5, STIMES ;;D0 5 ITERATIONS 


VO A Ee EE 


Doelié Soeur ipaeee ct Baar :7ELEAR PRESET BUFFER 


e 
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104006 


005077 
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PAGE S3 
#TEST THE ABILITY OF CLOCK TO COUNT AT IKHZ RATE 


000041 


173144 


ooc00s 


173130 
173126 
000051 


173246 


001160 


173116 


MOV SBITO!4O,9ASR 5 /START CLOCK, ODEO, RATE: 1KHZ 
CLR RO */NOW WE’LL DO A LITTLE DELAY. THIS DELAY 
1S: INC RO and AMOUNT TO APPROXIMATELY 
BNE 1$ :/369 MS. 
MOV @ASR, -(6) iat CSR 
MOV (6). $TMP3 /GET CSR. 
BIC #177707,$TMP3 _;/SAVE RATE BITS. 
BIS rat ieearra’ STMP3 ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
MOV STMP3, JASR */LOAD CSR. 
;/THIS MUST BE DONE IN 
TO EEEER ON GTOeS 
BIS #81T9, JASR */GENERATE ON ST2 PULSE 
MOV ABR, $BDDAT ;/READ THE PRESET BUFFER, 
:/PREVIOUS COUNTER 
MOV (6)+, JASR */CONTENTS ARE IN SBDDAT. 
a: a: Yas 
TSTB = -2(6) :/AT HIGH RATE MAY HAVE HAD OVERFLOW 
:/NOTE: CSR HAD BEEN PUT ON STACK. 
BMI 2s :/NEXT TEST Wo OVERFLOW. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 6 ;7CLOCK FAILED TO COUNT AT 
; RATE: 1KHZ 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


es: CLR dASR ;/CLEAR THE CLOCK. 
5 MEME ME HEHEHE HE ESE ESE SE EEE HE HEHE HEHE SEE SEE HE HE ME EEE EEE EEE EEE EERE ES 
i TEST 40 #TEST THE ABILITY OF CLOCK TO COUNT AT 1COHZ RATE 


tATHIS TEST IS pad Se ” TEST THE CLOCK’ S ABILITY 
pevO COUNT AT 100HZ RATE 


nee NS eR 
jute SCOPE 
MOV #5, STIMES ;;D0 S ITERATIONS 
CLR ASR ;/CLEAR CLOCK 


CLR @ABR /CLEAR PRESET BUFFER 
MOV . #BITO!S0,dASR 7st ART CLOCK, MODEO 


100HZ 
CLR RO W WE'LL DO A PeTtLe DELAY THIS DELAY 


- a ene oe = 


COS 


MAINDEC-11-DVKWA-B MACY11 27(665) 21-FEB-77 14:43 PAGE S4¥ 
DVKWAB. P11 T4O ¥TEST THE ABILITY OF CLOCK TO COUNT AT 1OOHZ RATE 
2544 006262 005200 a 1S: INC RO ;/WILL AMOUNT TO APPROXIMATELY 
eet 006264 001376 BNE 1S :/369 MS. 
2547 006266 O01 173104 JASR, -(6) . 
2548 006272 ase 001424 MO (6) .STMP3 : : 
2549 006276 042737 177707 001424 BIC #177707,STMP3 _3/SAVE RATE BITS. 
2550 006304 052737 O0400S O0014°4 BIS SBITLI'BIT2!BITO,STMPS ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
2551 006312 013777 OO1424 173056 MOV STMP3, JASR */LOAD CSR. 
2552 s/THIS MUST BE DONE IN 
2553 */ORDER TO XFERR COUNT 
2554 - :/TO BUFFER ON ST2. 
2555 005320 052777 001000 1 BIS #8179, JASR */GENERATE ON ST2 PULSE 
gob 006326 017737 17304 001126 MOV ABR, $BDDAT j/READ THE PRESET BUFFER, 
2558 006334 012677 173036 MOV (6)+. JASR */CONTENTS ARE IN SBDDAT 
2559 006340 005737 O01126 TST SBODAT ; /RESTORE. CSR 
2560 006344 O01004 BNE 2s */YES - NEXT TEST. 
2561 0063%% 105766 177776 TSTB 0 -2(6) 7a HIGH RATE MAY HAVE HAD OVERFLOW 
Seep : /NOTE: HAD BEEN PUT ON STACK. 
e563 006352 100401 BMI 2s j /NEXT TEST IF OVERFLOW. 
2565 j 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2568 006354 104006 ERROR 6 ;/CLOCK FAILED TO COUNT AT 
2569 : /RATE: LOOHZ 
— ; s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2573 
ora 006356 0905077 173014 2s: CLR JASR s/CLEAR THE CLOCK. 
2576 
2577 2 
2578 ‘= j FERRE AERR ERE H TEE TNTUE ABILITY OF CLOCK 10 COUNT AT LINEFREG R j 
2579 qktest ¥TEST THE ABILITY OF CLOCK TO COUNT AT LINEFREQ RATE 
See 


Tus TEST IS DESIGNED TO TEST THE CLOCK’S ABILITY 
*TO COUNT AT LINEFREQ RATE. 


7 eesaapeeegaaeeeeastaceeeasaaeeeesaneeeeeaneneeeeaseneeessaons 


y 


2582 
2583 
2584 . 
2585 | 
2586 006362 000004 tST41: 
go87 006364 012737 OO000S 001160 MOV 8S, STIMES - D0 S ITERATIONS 
2589 006372 032777 O10000 172540 BIT #B1T12, aSWR SHALL WE TEST 
2590 ol, : “LINE FREQ? 
e591 a - ;SWle=1 
53 006400 001450 Se BEQ TsT4e !. 33 
2594 O06402 005077 172770 - CLR JASR ERR 
2595 006406 005077 172766 CLR JABR /CLEAR PRESET BUFFER 
g50e OO6412 012777 000071 172756 MO'Y #B81T0!70,aASR “START CLOCK, MODEO, RATE:LINEFREQ 

006420 905000 CL RO /NOW WE'LL DO A LITTLE DELAY. THIS DELAY 


3 
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" MAC 
#TEST THE ABILITY OF CLOCK 


001160 


172626 
172620 


DOS 


21-FEB-77 14:43 PAGE SS 
TO COUNT AT LINEFREQ RATE 
1S: INC RO ;/WILL AMOUNT TO APPROXIMATELY 
BNE 1§ :/369 MS. 
MOV @ASR, -(6) 1/aave CSR 
MOV (6) STMP3 
BIC #1 STMP3 ITS. 
BIS #BITI1BIT Ly STNP ws MODE 2, NO RATE, DISABLE INTERNAL OSC 
MOV STMP3, JASR ee 
;/THIS NST, Be BE DONE IN ~- 
*/ORDER TO XFERR COUNTER 
:/T0 STe. . 
BIS #8179, JASR */GENERATE ON ST2 PULSE 
MOV ABR, $B0DAT : /READ PRESET BUFFER, 
;/PREVIOUS COUNTER 
MOV (6)+, JASR /CONTENTS ARE IN SBDDAT.° , 
TST SBDDAT : /RESTORE CSR t-" 
BNE 2 /YES - NEXT TES 
TSTB 3s -2(6) ;/AT HIGH RATE HAD OVERFLOW 
/NOTE: CSR HAD BEEN PUT ON STACK. 
BMI 2s */NEXT TEST IF OVERFLOW. 


rd 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


;/CLOCK FAILED TO COUNT AT 7 ‘ee 
; “RATE: LINEFREQ : te 


seamen meeemaite ERROR << <S$S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


es: CLR dASR 


if 
tétu2 


#20, STIMES 

CLR ASR 

CLR . dABR 

BIS #B1T0,aASR 

BIS #8178, JASR 

CLR RO : 
1S: INC RO 

BNE 1$ 

MOV ASR, -(6) 

MOV (6), $TMP3 


;/CLEAR THE CLOCK. 


j HNENaNeeeneeeeneneestanseessesectonseqesssenevsssertassenesens 


THAT COUNTER DOESN’T COUNT 
"ga "japamac: euceamaaamaaamaei numa i: 


AVE IN" RATE IS SELECTED 
;;D0 20 ITERATIONS 

sCLEAR CSR. 

‘CLEAR PRESET BUFFER. 

;SET GO BIT, RATE: "SLAVE IN” 

;GENERATE A MAINTENANCE STI. 


;NOW DO A SHORT DELAY. 


:/SAVE CSR 
:/GET CSR. 


MAINDEC-11-DVKWA-B MACY11_27(665) 21-FEB-77_ 14:43 PAGE S6 
DVKWAB.P11 T42 *#TEST THAT COUNTER DOESN’T COUNT WHEN “SLAVE IN” RATE IS SELECTED 


006574 042737 177707 001424 BIC #177707,$ /SAVE RATE BITS. 
2653 006602 052737 OO400S 001424 BIS sarTiieBiTera1T0" STMP3 ;/SET MODE 2, NO RATE,DISABLE INTERNAL CSC 
2654 006610 013777 O01424 172560 MOV STMP3, JASR 5 L080 CSR. 
2655 ;/THIS nis BE DONE IN 
2656 t/ 0 XFERR COUNT 
2657 :/T0 RereR ON STe. 
2658 006616 052777 001000 172S5S2 BIS #B1T9, JASR /GENERATE ON ST2 PULSE 
2659 006624 017737 172550 001126 MOV JABR, $BDDAT :/READ THE PRESET BUFFER, 
;/PREVIOUS COUNTER 

2661 O06632 012677 172540 MOV (6)+, JASR :/CONTENTS ARE IN SBDDAT. 
2662 006636 005737 001126 TST SBDDAT : /RESTORE CSR 
2663 O06642 001003 BNE IF ANY COUNT, ERROR 
2664 OO06644 105777 172526 TSTB = @ASR j CHECK FOR OVERFLOW 
2665 O06650 100003 BPL 3$ IF NO OVERFLOW, NEXT TEST 
sppe 006652 005037 001124 . 2s: CLR SGDDAT ;CLEAR FOR TYPEOUT, EXP’D ZERO. 

; s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2671 OO6656 104011 ERROR 11 CLOCK COUNTED WHEN RATE:"SLAVE IN” 
e672 “WAS SELECTED. 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2676 006660 005077 172512 3S: CLR ASR CLEAR CLOCK’S CSR. 
2678 
2679 oKESSXRE REL RSLRERASRERERKSL LE LEL EXELL LER EREL LEE SE RL HELE AE LAE LL KE 
2680 IETEST 43 ¥TEST THAT THE CLOCK WILL COUNT IN MODE 
2681 ee ee ee eee 
eb8e 006664 900004 +6743: OPE 
2684 006666 005077 172504 CLR JASR CLEAR THE CSR. 
2685 006672 012777 177777 172500 MOV #-1, 3ABR “PRESET BUFFER REG. 
2686 006700 05e777 000013 172470 BIS #13, 0ASR :START CLOCK,RATE:1 MHZ,MODE 1. 
at 006710 105200 1S: INCB = RO NOW DO A SHORT DELAY SO THAT THE 
e683 006712 001376 BNE 1$ ‘CLOCK CAN COUNT TO OVERFLOW. 
2691 006714 105777 172456 TSTB = ASR OVERFLOW SHOULD HAVE SET. 
eb3e 006720 100401 BMI 2s ‘GOTO NEXT TEST IF SO. 
2694 

;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2697 006722 104006 ERROR 6 ;CLOCK FAILED TC COUNT UP AND SET 
638 OVERFLOW IN MODE 1 

5 ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2702 006724 2S: 
2703 
2704 


2705 -SBTTL *# 


FOS 
SOREL Oe REE Hite? PE? 


2706 .SBTTL #PHASE 4 CLOCK INTERRUPT TEST. 
a -SBTTL # 


Se 


iiTesT Wy STEST THAT THE CLOCK WILL INTERRUPT ON OVERFLOM 


ae 44 #TEST THAT THE CLOCK WILL INTERRUPT ON OVERFLOW 
1 fs A I RO 
13 006724 o00004 un SCOPE 
eri 006726 012737 O00020 001160 MOV #20, STIMES ;;D0 20 ITERATIONS 
2716 
2717 006734 012746 000340 MOV #340, -(SP) sPUT PRIORITY ON STACK. 
e718 006740 012746 006746 MOV #64S; -(SP) PUT RETURN ADDRESS ON STACK 
2719 006744 O00002 RTI :DO AN RTI, PUTS PRIORITY IN CPU. 
57e0 006746 SNE: 
006746 005077 172424 CLR ASR sCLEAR CLOCK’S CSR. 
2723 006752 012777 177777 172420 MOV #-1, JABR SET PRESET BUFFER TO ALL ONES. 
538d 006760 012777 000161 172410 MOV #161, 9ASR ;START CLOCK, RATE:ST1. 
2726 006766 052777 OOO400 172402 BIS #8178, JASR :GENERATE A MAINTENANCE ST1. 
ere? 006774 012777 007034 172400 MOV #15, aVECTL *SET INTERRUPT ADDR. 
ras Gores Glare Ba ry waste, AUT ASTOR a ma 
2731 007012 000002 RTI ‘ 00 AN RTI N Pre PRIORITY IN IN CPU. 
arse 007014 65S: 
e734 007014 oo02e40 NOP ;STALL TIME 
2736 007016 012746 000340 MOV #340,-(SP) :PUT PRIORITY ON STACK. 
2737 007022 Ole746 007030 MOV #66$; -(SP) *PUT RETURN ADDRESS ON STACK 
2738 007026 oo0002 RTI "DO AN RTI, PUTS PRIORITY IN CPU. 
2739 007030 66S: 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
amg 007030 104007 ERROR 7 sCLOCK FAILED 70 INTERRUPT. 
; : SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 

2747 007032 coo4oe 
2748 007034 1S: - - 
2749 007034 062706 000004 ADD #4, SP /ADD #4 TO STACK POINTER. 
3760 007040 005077 172332 2s: CLR aasR ; CLEAR THE CLOCK. 
e752 RARER NARERSERA RES LEE RKESRELLEVESLE RLS LSA ESRA RY EEE ES HERRSER RE EKER 
e783 iT ST 45 ¥TEST THAT ST2 WILL CAUSE AN INTERRUPT 

Ly ee Ene a 
grep 007044 oo0004 une SCOPE 


2757 
768 Oorose OlSrae Bovee HOY wbd8-(8) PUT RETURN ADDRESS ON’ STACK 


NAINDEC-11-DVKWA-B 
DVKWAB.P11 T4S 
2760 o0000e 
et BRS 

oe 007060 005077 
e764 007064 012777 
e765 aes 012777 
Boe? 

2768 007106 012746 
e769 O07lie 012746 
e770 00711& 000002 
2771 007120 

2773 007120 O00240 
se Wis Bens 
2778 007134 

2779 

2782 007134 104007 
2783 

2786 007136 o00402 
2787 007140 

2788 007140 062706 
2789 7144 005077 
2730 

2791 

27 


GOS 


MACY11_27(665) @2l1-FEB-77 14:43 PAGE S8 
#TEST THAT ST2 WILL CAUSE AN INTERRUPT 


RTI 
64S: 
172312 CLR JASR 
007140 172314 MOV #1$, AVECT2 
040001 172276 MOV #BIT14!BIT 
001000 172270 BIS #8179, JASR 
oo0000 MOV #0,-(SP) 
007120 MOV #65S, -(SP) 
RTI 
65S: 
NOP 
000340 MOV #340, -(SP) 
007134 MOV #66$, -(SP) 
RTI 
66S: 
; : SSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 7 
;  SSSSSSSSSSSSSSSSSSSSSSSS 
“ BR 23 
oocoo4 . ADD #4, SP 
172226 2s: CLR aAsR 
SBTTL 
SBTTL 
SBTTL 


;D0 AN RTI, PUTS PRIORITY IN CPU. 


scLORS CLOCKS CSR. 

;SET UP INTERRUPT VECTOR. 
0,0ASR;SET “INT2”,AND GO 

;GENERATE A’ MAINTENANCE ST2. 


ut PRIORITY ON STACK. 
T RETURN ADDRESS ON STACK 
DO AN RTI, PUTS PRIORITY IN CPU. 
;STALL TIME 
;PUT PRIORITY ON STACK. 
;PUT RETURN ADDRESS ON STACK 
:D0 AN RTI, PUTS PRIORITY IN CPU. 
>>> ERROR << (SS$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
;CLOCK FAILED TO INTERRUPT ON STe. 
>>> ERROR << (S$$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


/ADD #4 TO STACK POINTER. 
; CLEAR chock’ S CSR. 


x 
aPHRSE S ADVANCED TESTING 


Boon 


BR 8 


0D 
—— 
—-OwD 


Re 


BSB RPROSS 


ty 


097224 


007224 
007226 


007234 
007240 
007246 
007254 
007256 
007260 


007262 
007270 


3? 007272 


007300 


007306 


007310 


0 
001007 


017737 
012737 


104001 


000004 
012737 
005077 
012777 
052777 
005000 
105200 
001376 
032777 
001007 


017737 
012737 


104001 


MACY11_ 27(665) 
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— 
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HOS 


1-FEB-77 14:43 PAGE S9 
OR” BIT WILL SET ON 2 ST2’S 


5 ist 4 aTeaT Gat fa ote iT an ene 
:&TEST 46 #TEST THAT THE “FOR” BIT WILL SET ON 2 ST2’ 
jeaneaseaveuveaneaseaccnseeateaeeateaesnHateaeaneeesateaeaat 


téT46 


CLR JASR ;START WITH CSR CLEAR. 
INC aAsR ;SET GO BIT. 
BIS #BIT9, JASR : GENERATE THE 1ST ST2 PULSE. 
BIS #81T9, JASR ; GENERATE 2ND ST2 PULSE. 
THIS SHOULD CAUSE FOR BIT TO SET. 
BIT #81712, JASR DID FOR BIT SET? 
BNE is *YES-THEN NEXT TEST. 
MOV JASR, SBDDAT RECORD CSR. 
MOV #81T15!B1T12¢B1T6, SGDDAT ;RECORD S/B. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 1 sERROR-"FOR” BIT FAILED TO SET ON 


ON TWO SUCCESIVE STe PULSES. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


1S: 
3 es eat hat fen ont a, et ie te ne 
: &TE *#TEST THAT FOR BIT WILL SET ON TWO OVERFLO 
jjeeaeencenegueateateaveneensesteneestenteneese3ne4Xe4 0H RF EEE 
#2, STIMES ;;D0 2 ITERATIONS 
CLR aASR ;START WITH CSR CLEAR. 
MOV #-1, JABR *PRELOAD BUFFER REG. 
BIS #13, JASR :START CLOCK MODE 1, 1MHZ. 
CLR RO *NOW DO A T DELAY. 
1S: INCB RO *DURING THIS DELAY, THE CLOCK WILL 
BNE 1S "HAVE OVERFLOWED TWICE- 


THIS SHOULD CAUSE THE FOR BIT TO SET. 


BIT #81T12,0ASR ;DID FOR SET? 
BNE 2s ; YES-NEXT TEST. 


MOV JASR, SBDDAT ;NO-RECORD THE CSR. 
MOV #010213,$GDDAT ;RECORD S/B. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 1 j ERROR FOR BIT FAILED TO SET ON 
; TWO SUCCESSIVE OVERFLOWS. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS> >> enon « ($SSSSSSSSSSSSSSSSSSSSSSSSSSSSSES 


2s: 
Merrett rir ii it iit iiiii itt ititiitiititiitiitititittttttttttt tT] 


Re tt OMKMR Te BOE r HT ee tOReS att itl CLEAR IF GO'GIT 1S SET - 


eeu ;#TEST SO “TEST THAT FOR BIT WILL CLEAR IF GO BIT IS SET 
* SEEREAEREARSERALERSRELARERELASEASSERERERARARRARARERAEEAA AERA RAKES 

e851 007310 oo0004 +é150: SCOPE 

007312 012777 O00001 1 MOV #81TO, JASR SET Go. PIT. 
ceed 007320 052777 001000 135088 BIS #B81T9, JASR ier is ists! Pub 
2855 007326 001000 172042 BIS #BIT9, JASR TE end PULSE PULSE. 
256 Retr TsetS HERE. 
g3e7 007334 042777 000001 172034 BIC #B1T0, 9ASR FoR 8 
2859 007342 052777 OO00001 172026 BIS #BIT0, ASR ;SET THE "GO" BIT ASAIN - 
e860 *SHOULD CLEAR FOR BIT. 
2862 007350 017737 172022 001126 MOV ASR, SBDDAT ;READ THE CSR. 
er 007356 012737 100001 001124 MOV #100001,$GDDAT ;RECORD WHAT CSR S/B. 
2865 007364 032737 O10000 001126 BIT #81T12,$B80DAT ;DID FOR BIT CLEAR? 
eBb6 007372 001401 BEQ 1$ >YES NEXT TEST. 

ss SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2870 007374 104001 ERROR 1 ;FOR BIT FALED TO CLEAR 
e871 WHEN “GO” BIT WAS SET. 
; s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 

2876 007376 005077 171774 1S: CLR aASR ;CLEAR THE CSR. 
2877 SEEK CLERK KSLESEE LHEAA ESLER EEEAH LAR RERKEK ELLE ELE LARA AERA LAKES 
2878 hy TEST 51 #TEST THAT WE CAN DISABLE THE INTERNAL OSC 
28793 ag nmeaaaay “oper venmmaneameaamaananines or annem 
2880 007402 oD0004 +6151: SCOPE 
2881 007404 012737 OOO000S 001160 MOV #5, STIMES ;;D0 5 ITERATIONS 
Ste 007412 171760 CLR 3ASR sCLEAR THE CSR 
2884 007416 005077 171756 CLR aABR “CLEAR THE PRESET BUFFER 
2885 007422 001124 CLR SGDDAT “CLEAR EXPED. 
see aS 007426 012777 OO4000 171742 MOV #81T11,9ASR sDISABLE THE INTERNAL OSC. 
2888 oo7ia4 O77? 000011 171734 BIS aB1TS! 'BITO,9ASR ;START CLOCK:RATE 1MHZ. 
sega 007444 105200 18: INCB = RO ;DELAY A SHORT TIME. 
2891 007446 001376 BNE 1$ 
e892 007450 017746 171722 DASR, -(6) ;/SAVE CSR 
2893 007454 011637 001424 (6), $TMP3 5/GET CSR. 
2894 007460 042737 177707 o01424 BIC #177707 $7 STMP3 VE RATE BITS. 
2895 007466 052737 OO400S 901424 BIS #BIT11°BIT T2!B1T0° $ MPS ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
2896 007474 013777 O01424 171674 MOV STMP3, JASR 2 / CSR. 
2897 ;/THIS MUST BE DONE IN 
22898 :/ORDER TO XFERR COUNTER 
2899 i/ 0 BUFFER ON STe. 
2900 007502 052777 OO1000 171666 BIS #B1T9, ASR ;/GENERATE ON STe PULSE 
-2901 007510 017737 171684 001126 MOV ABR, $BDDAT yt THE PRESET BUFFER, 
2902 /PREVIOUS COUNTER 
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MACY11_27(665) 21-FEB-77 14:43 PAGE 61 
¥TEST THAT WE CAN DISABLE THE INTERNAL OSC 


171654 MOV (6)4 ASR ;/CONTENTS ARE IN SBDDAT. 
001126 TST $BDDA + /RESTORE CSR 
BEQ 2s NO = GOOD - NEXT TEST. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <(SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 11 ;CLOCK DISABLE INTERNAL 


;0SC. DID NOT WORK. 
; » SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


171640 2s: CLR ASR CLEAR THE CSR. 
oPEXMEPEXELSY YL EERE PE RRLESHLSE LEEK ELELE LES UL RLSSELLESESEE ESSERE ESE 
tSTEST 52 ¥TEST THAT CLOCK CAN D USING MAINT £ 

} j Senensnnenenenesesnsnsennseesennsssseseeenaasasensenennseenees 

171632 CLR ASR CLEAR THE CSR. 

171630 CLR JABR *CLEAR THE PRESET BUFFER. 

004000 171620 BIS #81711, 9ASR ‘DISABLE THE INTERNAL OSC. 

000011 171612 BIS #8173!B1T0, ASR i START CLOCK, 1MHZ, GO. 

177754 MOV #-20. ,RO >SET TO COUNT 3 Times” 


oo2000 171600 1S: BIS #81T10, ASR ;GENERATE 1 MAINTENANCE OSC. 
;NOTE: AT IMHZ, IT TAKES 10 
OSC_TO’EQUAL 1 COUNT 


:MAINT. 
INC RO *DO 20 MAINTENANCE bse. 
171570 MOV - Aig c 
001424 MOV (6) (6), $703 7SET CSR. 
177707 001424 BIC #177707,S$TMP3 ;3/SAVE RATE BITS. 
004005 001424 BIS saiTi1 Oi rera1TO" STMPS ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
001424 171542 MOV STMP3, JASR /LOAD CSR. 
;/THIS MUST BE CONE IN 
: TO COUNTER 
:/TO BUFFER ON STe. 
001000 171534 BIS #BIT9, JASR */GENERATE ON ST2 PULSE 
171832 001126 MOV ABR, $BDDAT +/READ THE PRESET BUFFER, 
*/PREVIOUS COUNTE 
171522 MOV (6)+, JASR */CONTENTS ARE IN SBDDAT. 
001126 TST SBDDAT +/ CSR 
BNE 23 *YES - NEXT TEST. 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 11 ;ERROR COULD NOT COUNT USING 
;MAINTENANCE OSC. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
171506 2s: CLR @ASR ;CLEAR THE CSR. 


KOS 
BVKMABSPLT ree) SaeSt That erock Gan Be COUNTED USING MRINTENANCE. OSC 


iitest 63 STEST THE CLOCKS IMHZ DIVIOER' 
j tHHHOPSSSSEEEEEEEEDESEEOHESHHDEOERESSESHRROEOEEOSESEEOREORAGENE 
Wee 000005 001160 MOV #5, STIMES ;;D0 S ITERATIONS 
005077 171472 CLR 3ASR ;/CLEAR THE CSR. 
71470 CLR JABR * /CLEAR PRESET BUFFER. 
777 171460 BIS #B1T11, ASR : /DISABLE INTERNAL OSC. 
000011 1714Se2 BIS #1!10, dASR ;/ENABLE CLOCK, RATE: IMHZ 
012700 177766 10S: 8-10. ,RO ;/SET TO GENERATE 10 OSC PULSES. . 


prey ae i ee 


002000 171440 1S: 
000001 #1, SGDDAT . oe FOR, ERROR TYPEOUT - IF ANY. 


383 Bess 


012737 001124 25 
1 71422 aAsR, -(6) 
j ; GL STE, ae can 
1 0014 BIC #1 TMP3 VE RATE BITS. 
052737 O0400S 001424 BIS #81 1T11!6172!81T0" STMP3 ;/SE MODE 2, NO RATE,DISABLE INTERNAL OSC 
013777 001424 171374 MOV STMP3, 
;/THIS miss E IN 
j ORDER TO com COUNTER 
1 71366 BIS #B1T9 3 / oat ie 
stents 895555 1 1308 balice MOV Shar $B00RT aa be BUFFER, 
10016 012677 171354 (6)+. 9ASR I ZEORTENTS BRE Ih ARE Ine SBDDAT. 
10022 005737 001126 TST T ; /RESTORE C 
010026 013737 001124 o01420 MOV SGDDAT,STMPO © ;/STMPO USED IN ERROR TYPEOUT. 
010034 023737 001124 001126 CMP SGDDAT,SBDDAT ;/DID CLOCK ADVANCE ONCE? 
010042 001402 BEQ 3s ;/YES - NEXT TEST. 
; s SSSSSSSSSSSSSSSSSSSSSSSS)>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
010044 104011 ERROR 11. ;/ERROR ON CLOCKIMHZ PULSE 
;/NOT GENERATED WHEN 10 
:/0SC PULSES GENERATED. 
;  SSSSSSSSSSSSSSSSSSSSSSSS> >> cael << ( $SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1 Guy BR 
Bt Obe yee 000011 3S: MOV 33. »RO ;/GET THE NUMBER OF MORE OSC PULSES 


Boe SGRe BanATR RSE SRE RREBIa aaa a eee ee Pee ROR ERG 


;/TO BE GENERATED. 
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THE CLOCK’ 


171314 


171146 


001124 


0S 


1-FEB- 4:43 PAGE 63 
g IMA DIVIDER 
4§: BIS #8IT10,dASR rh ate ANOTHER OSC PULSE. 


C RO WANT TO CHECK 
4§ ;/1MHZ PULSE ON 9 OSC PULSES 
MOV QASR, -(6) ; 
MOV (6), $TMP3 
BIC #1 STMP3 Sie “aan. 
BIS #B1T11'61T2!B1T0,$ 2, NO RATE,DISABLE INTERNAL OSC 
MOV STMP3, JASR CSR. 
;/THIS BE IN 
; COUNTER 
3/T0 ON ST2 ’ 
BIS #81T9, ASR 3/ ON é PULSE } 
MOV ABR, SBDDAT i /READ PRESET BUFFER, 
MOV (6)+ 3/ ARE IN SBDDAT. 
TST He teal REST CSR 
CMP SGDDAT , SBDDAT sue ANOTHER 1MHZ PULSE GENERATED? 
BEQ og - NEXT TEST. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> nin (<((S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 11 ;/WE SEEM TO HAVE GENERATED 


;7ANOTHER 1 PULSE ON 
;/0NLY 9 MA MAINTENANCE 
;70SC PULSES. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


SS: CLR ASR ;/CLEAR THE CSR. 
. iter ca alEST THE CLOCKS OMI DIVIER SS 
ATES #TEST THE CLOCK’S 100KHZ DIVIDE | 
; jeaeeaseeneenveateanesaneHieaeseseaseHueHeeesnenteSeESHHED1E0%8 
MOV 85, STIMES ;;D0 S ITERATIONS | 
CLR i /CLEBR 
CLR orBR AR THE PRE PRESET BUFFER. 
BIS e111 JASR i7ors E THE INTERNAL OSC. | 
BIS #1!20, 9ASR / CLOCK, RATE: 1OOKHZ 
} 
10S: Mov #-100. ,RO ;/SET TO GENERATE 100 OSC PULSES. 
1S: BIS #81710, 3ASR GENERATE ONE OSC PULSE. 
INC RO i /DONE 100 0s OSC PULSES? 
BNE 1$ = DO ANOTHER ONE. 
2S: MOV #1, SGDDAT :/SET FOR ERROR TYPEOUT - IF ANY. 
MOV ASR, -(6) :/SAVE CSR 
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#TEST THE CLOCK’ 


rap 
a 1102 
T7iove Obliz6 


gi 
iba 001420 
001124 001126 


002000 171022 


1-FEB-77 14:4 
100KHZ DIVI 


MOS 


PAGE 64 


Paitin ag ah spt ey a 
ERTS 
ABR, SBDDAT aie, PULSE 


{Oe Agron BRE IN IN seooaT. 
SGDDAT , STMPO ae ae ERROR TYPEOUT. 
SGDDAT,SBDDAT ;/DID CLOCK ADVANCE ONCE? 

3s ;/YES - NEXT TEST. 


#81T9, 9ASR 


; s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


11 ;7ERROR ON CLOCKIOOKH2 PULSE 
;/NOT GENERA ep EN AO 
3/0SC PULSES GENERA 


; s SSSSSSSSSSSSSSSSSSSSSSSS> >> Enron « ¢ (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


BR 
3$: MOV 


4S: BI 


MOV 
TST 
CMP 
BEQ 


S$ 
#99. ,RO ;/GET THE NUMBER OF MORE OSC PULSES 
;/TO BE GENERATED. 


#81T10,dASR GENERATE ANOTHER OSC PULSE 
+ OOK WE WANT TO CHECK 


RO C 
4 /\00KHZ PULSE ON 99 OSC PULSES. 
JASR, -(6) :/SEVE CSR 
(6), STMP 
#177707, STMP3 SAVE RA BITS 
#BIT i et STNP s/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
STMP3, JASR jab 

j/THIS BE OONE I 

0 XFERR COUNTER 

i 0 ON ot 2. 
#8179, 9ASR RATE ON STe PULSE 
ABR, $BDDAT AD THE PRESET BUFFER, 

yd COUNTER 
(6)+ ;/CONTENTS ARE IN SBDDAT. 
SBDDA ;/RESTORE CSR 
SGDDAT , SBDDAT 5 WAS ANOTHER QOKHZ PULSE GENERATED? 
cS :/NO - NEXT TE 


; ; SSSSSSSSSSSSSSSSSSSSSSSS> >> owen ¢ ¢ ($SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 


11 ;/WE SEEM TO HAVE GENERATED - 


eee eee see 2 ree oe 
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; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
SS: CLR dASR ;/CLEAR THE CSR. 


BTeSt The CLock’S 1ooKne oIvider *™* * 


5 5 RHRRREE EERE REEEE ELLA EAR ARR RRA EEE EERE EELS LEER RRLRE ERE R EERE ES 
;4TEST 5S #TEST THE CLOCK’S 10KHZ DIVIDER 
+ yaa 2” _aggagapssraspeasscusmguyeamumsammamapaaits cna: 


tSTss: ; 
#5, STIMES “_ 5 ITERATIONS 
CLR ASR 
CLR JABR CLEAR IME PRESE SET T BUFFER. 
BIS #81711, 9ASR ie 
BIS #1130, ASR “ENABLE CLOCK” gaat oR” 
10S: MOV | #-1000. ,RO ;/SET TO GENERATE 1000 OSC PULSES. 
1S: BIS #81T10, 2ASR ;/GENERATE ONE OSC PULSE. 
INC RO : “DONE 1909, 9 OSC ¢ Pu. 5? 
BNE 1$ 3/NO = DO ANO 
MOV #1, SGDDAT ;/SET FOR ERROR TYPEOUT - IF ANY. 
MOV -(6) Save eer 
MOV 6) TMP3 
BIC STMP3 SAVE LN 
BIS $1 seititientorerv, STNPS NODE 2, NO RATE,DISABLE INTERNAL OSC 
MOV 
i/THIS Mist Be BE Sone IN 
TO XFERR COUNTER 
BIS #81T9, JASR Dee sie “ouse 
MOV ABR, $BDDAT 5 RE Bb THE Phe SET BUFFER, 
MOV (6)+, 9ASR i CONTENTS ARE IN SBDDAT. 
TST T + “RESTORE 
MOV SGDDAT,STMPO §- ; /STMPO USED IN ERROR TYPEOUT. 
CMP SGDDAT,SBDDAT  ;/DID CLOCK ADVANCE ONCE? 
BEQ 38 ;/YES - NEXT TEST. 


; ; SSSSSCSSSSSSSSSSSSSSSSSS>>> ERROR <<< prs epeerenngagg em 


ERROR 11 ; “ERROR paYED WEN pu SE 
shen gener 
e 


* 


MAINDEC-11-DVKWA-B 
DVKWAB.P11 TSS 

3175 010632 000443 

3176 010634 012700 

3177 

3178 

3179 010640 052777 

3180 01064 

3181 010650 001373 

3182 

3183 

3184 010652 017746 

3185 010656 011637 

3186 010662 042737 

3187 010670 052737 

3188 010676 013777 

3189 

3190 

3191 

31392 010704 777 

sig 010712 017737 

3195 010720 012677 

3196 010724 737 

3197 010730 023737 

3198 010736 001401 

3199 

3202 010740 104011 

3203 

3204 

3205 

3206 

3209 010742 005077 
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3211 

gele 

3213 

3214 

Est 

3216 010746 

4 010750 012737 

3219 010756 005077 

3ee0 010762 005077 

3eel 010766 052777 

geee 010774 052777 

3223 

355c 011002 012700 

3226 
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#TEST THE CLOCK’S 10KHZ DIVIDER 


001747 


58 
Fas 


Sor 
Re 


170430 
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170414 
170412 
004000 


000041 


154360 


170530 


001160 


170402 
170374 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


BR S$ 
3$: MOV #999. ,RO. THE NUMBER OF MORE OSC PLLSES 


;/GET 
;/TO BE GENERATED. 


4S: BIS #8IT10,aASR pe lle ANOTHER OSC PULSE. 
DEC RO WHAT_WE WANT TO CHECK 


BNE 4g +H OKHZ PULSE ON 999 OSC PULSES. 
MOV - Youn CSR 

MOV (6) OCS gTHES /GET CSR. 

BIC #177707,STMP3 _:/SAVE RATE BITS. 


MOV */L SR. 
s/THIS MUST BE DONE IN 
: R TO COUNTER 
:/TO BUFFER ON STe. 
BIS #B1T9, JASR */GENERATE ON STe PULSE 
MOV JABR, $BDDAT ;/READ THE PRESET BUFFER, 
:/PREVIOUS COUNTER 
MOV (6)+, aASR /CONTENTS ARE IN SBDDAT. 
TST SBDDAT : “RESTORE CSR 
CMP SGDDAT , SBDDAT 5 WAS ANOTHER 10KHZ PULSE GENERATED? 
BEQ S$ */NO - NEXT TEST. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> amet < ((SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 1i :/WE SEEM TO HAVE GENERATED 


;/ANOTHER 1OKHZ PULSE ON 
;/ONLY 999 MAINTENANCE 
;70SC PULSES. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


S$: CLR dASR ;/CLEAR THE CSR. 


= 6-3-3 SE S- - 9 98 98 9 9 9 9  9 9 Ha EE 
ATEST S6 *TEST THE CLOCK’S 1KHZ DIVIDE 
Tm 2° ee aggumetemmggeanet 2 eemanaemenmmmmammece mates rsa 


+éT56 
_ #5, STIMES ;;D0 S ITERATIONS 
CLR aASR ;/CLEAR THE C 
CLR dABR */CLEAR THE PRESET BUFFE 


; “DISABLE THE INTERNAL 6st. 
;/ENABLE CLOCK, RATE: LKHZ 


10$: MOV #-10000. ,RO ;/SET TO GENERATE 10000 OSC PULSES. 


BIS eBIT11:B1Te'BITO: STMP3 ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
STMP3,@AS OAD C 


MAINDEC-11-DVKWA-B MACY11_27(665) eee be 14:43 PAGE 67 
DVKWAB.P11 #TEST THE CLOCK’S IKHZ DIVIDER 


TS6 
3e27 011006 052777 002000 170362 1S: 
00S200 


BIS #81T10, JASR ;/GENERATE ONE OSC PULSE. 

3228 O11014 INC RO */DONE 10000 OSC PULSES? 

3223 011016 001373 BNE 1S /NO = bo ANOTHER ONE. 

3231 

3232 011020 012737 000001 001124 2s MOV #1, SGDDAT ;/SET FOR ERROR TYPEOUT - IF ANY. 
3233 011026 017746 170344 MOV aasR, -(6) ;/SAVE CSR 

3234 011032 011637 001424 MOV (6), $TMP3 7 CSR 

3636 011036 042737 177707 O01424 BIC #177707, $TMP3 __;/SAVE RA TE BITS 

36 011044 052737 O0400S 001424 BIS #BIT11'BIT2!BITO,STMPS ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
3237 011052 013777 001424 170316 MOV STMP3, JASR 

3238 ;/THIS nis BE DONE IN 

3539 iE TO EER COUNTER 

3241 011060 001000 170310 BIS #B1T9, JASR */GENERATE ON ST2 PULSE 

sete 011066 017737 170306 001126 , SBDDAT */READ THE PRESET BUFFER, 

3244 0611074 012677 170276 MOV (6)+, 9ASR >/CONTENTS ARE IN SBODAT. 

3e45 011100 005737 001126 TST T * /RESTORE 

sub 011104 013737 001124 001420 MOV SGDDAT,STMPO §;/STMPO USED IN ERROR TYPEOUT. 

348 011112 023737 001124 001126 CMP SGDDAT,SBDDAT  ;/DID CLOCK ADVANCE ONCE? 

3250 011120 001402 BEQ 35 :/YES - NEXT TEST. 

;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 

3254 011122 104011 ERROR 11 ; /ERROR ON CLOCKIKHZ PULSE 

3255 ;/NOT GENERATED WHEN 10000 

325 ?/0SC PULSES GENERATED. 

; s SSSSSSSSSSSSSSSSSSSSSSSS)>> ana << (SS$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 

3250 011124 000443 BR S$ 
3261 Ollle6 012700 023417 3S: MOV #9999. ,RO T THE NUMBER OF MORE OSC PULSES 
3262 755 BE GENERATED. 

3264 011132 052777 OO2000 170236 4S: BIS #81710, 2ASR ; “GENERATE ANOTHER OSC PULSE. 

3265 011140 005300 DEC RO T WE WANT TO CHECK 

3et8 011142 001373 BNE 4§ + ARHZ PULSE ON 9999 OSC PULSES. 

3268 

3269 O11144 017746 170226 MOV JASR, -(6) 3/ SANE CSR 

3270 011150 011637 001424 MOV (6) STP /GET CSR. 

3271 011154 042737 177707 001424 BIC #177707,$TMP3 _;/SAVE RATE BITS. 

3272 O1li62 052737 OO4O0S O01424 BIS $B1T11! (AtTerarT0° STMP3 ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
3273 011170 013777 001424 170200 MOV STMP3, JASR ZL 08D CSR. 

3274 ;/THIS MUST BE 

en aero oreo 

3277 011176 052777 001000 170172 BIS #B1T9, JASR */GENERATE ON ST2 PULSE 

3278 011204 017737 170170 001126 MOV JABR, $BDDAT ; 7READ THE PRESET BUFFER, 

3279 */PREVIOUS COUNTE 


3280 Ollel2 012677 170160 MOV (6)+,JASR ;/CONTENTS ARE IN SBDDAT. 


DO6 
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DVKWAB.P11 TS6 #TEST THE CLOCK’S 1KHZ DIVIDER 


3281 011216 005737 001126 TST SBDDAT + /RESTORE CSR 
3282 Olloce 023737 001124 001126 CMP SGDDAT,SBDDAT ;/WAS ANOTHER 1KHZ PULSE GENERATED? 
3283 011230 001401 BEQ c$ >/NO - NEXT TEST. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
3287 011232 10401! ERROR 11 - /WE SEEM TO HAVE GENERATED 
3288 ; “ANOTHER 1KHZ PULSE ON 
3289 :/ONLY 9999 MAINTENANCE 
3250 >/0SC PULSES. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 

3234 011234 005077 170136 Ss: CLR ASR ;/CLEAR THE CSR. 
3296 
ssa, s iiitst c? atest THE CLOCK’S 1O0HZ DIVIDER 
OH 011240 ooo004 } Tae eeuamuamanas eamupaeepememmmemmmanie 
3301 O11242 012737 O0000S 001160 MOV #5, STIMES ;;D0 S ITERATIONS 
3305 011250 005077 170122 CLR ASR -/CLEAR THE CSR. 
3304 011254 005077 170120 CLR JABR */CLEAR THE PRESET BUFFER. 

011260 052777 004000 170110 BIS #81711, ASR ; DISABLE THE INTERNAL OSC. 
3306 Olleb6 052777 000051 170102 BIS #1!50, 2ASR :/ENABLE CLOCK, RATE: 1O0HZ 
3308 011274 012701 oo0o12 MOV #10. ,R1 
3310 011300 012700 154360 10$: MOV #-10000. ,RO ;/SET TO GENERATE 10000 OSC PULSES. 
3312 011304 002000 170064 1S: BIS #81710, ASR s/GENERATE ONE OSC PULSE. 
3313 011312 INC RO */DONE 10000 OSC PULSES? 
3314 011314 001373 BNE 1S */NO - DO ANOTHER ONE. 
3316 011316 005301 DEC Rl 
$317 011320 001367 BNE 10 
3319 011322 012737 000001 001124 2S: MOV #1, SGDDAT ;/SET_FOR ERROR TYPEOUT - IF ANY. 
3320 011330 017746 170042 MOV aASR, -(6) /SAVE CSR 
3321 011334 011637 001424 MOV (6) $TMP3 t/GET CSR. 
3322 011340 042737 177707 o014e4 BIC 177707 $1 STMP3 __:/SAVE RATE BITS. 
3323 011346 052737 Oo400S BO yoy BIS aOrT 114 BIT2'BITO,STMPS ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
3324 011354 013777 001424 170014 MOV STMP3, */LOAD CSR. 
3325 : ;/THIS MUST BE IN 
3359 OO BUFFER ON GTS. 
3328 011362 052777 001000 170006 BIS #B1T9 SAR */GENERATE ON ST2 PULSE 
3329 011370 017737 170004 001126 MOV ABR, $B0DA i/R /READ O THe PRESET BUFFER, 
3 3: t 011376 012677 167774 MOV (6)+, JASR */CONTENTS ARE IN SBDDAT. 
3332 011402 005737 001126 TST $BDDAT : /RESTORE C 
$333 011406 013737 001124 001420 MOV SGDDAT,STMPO © ;/STMPO USED IN ERROR TYPEOUT. 
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DVKWAB.P11 TS7 TEST THE CLOCK’S 100HZ DIVIDER 


3335 011414 023737 001124 001126 CMP SGDDAT,SBDDAT ;/DID CLOCK ADVANCE ONCE? 
337 011422 001402 BEQ 66S ;/YES - NEXT TEST 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
3341 011424 104011 ERROR 11 ; /ERROR ON CLOCK1O0HZ PULSE 
3342 :/NOT GENERATED WHEN 10000 
3343 */OSC PULSES GENERATED. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
3347 011426 o00447 BR S$ 
3348 011430 012701 ooo01e 66$: MOV #10. Rl 
3349 011434 012700 023417 3$: MOV 9995. , RO i/GET THE NUMBER OF MORE OSC PULSES 
$350 0 BE GENERATED. 
3352 O11440 052777 O02000 167730 4S: BIS #81710, ASR GENERATE ANOTHER OSC PULSE. 
3353 011446 DEC RO WHAT WE WANT TO CHECK 
3354 O114S0 001373 BNE 4g 5 IOOHZ PULSE ON 9999 OSC PULSES. 
3355 011452 1 DEC RI 
3356 011454 001367 BNE 3$ 
3357 
33 ae 011456 017746 167714 MOV -( ;/SAVE CSR 
3360 011462 011637 001424 (6) SR TMP */GET CSR. 
3361 011466 042737 177707 001424 BIC teen ernp3 /SAVE RATE BITS. 
3362 011474 004005 001424 BIS warti1iterazT0" STMP3 ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
3363 011502 013777 OO1424 167666 MOV STMP3, OAD 
3364 ;/THIS nist T BE DONE IN 
3365 */ORDER TO XFERR COUNTER 
3366 */TO BUFFER ON STe. 
3367 011510 052777 OD1000 167660 BIS #8179, JASR */GENERATE ON ST2 PULSE 
3368 011516 017737 167656 001126 MOV JABR, $BDDAT ao Te PRESET BUFFER, 
3370 011524 012677 167646 MOV (6)+, MASR :/CONTENTS ARE IN SBDDAT. 
3371 011530 005737 001126 TST T : /RESTORE CSR 
3372 011534 023737 001124 001126 CMP SGDDAT,SBDDAT ;/WAS ANOTHER 100HZ PULSE GENERATED? 
$373 011542 001401 BEQ c$ */NO - NEXT TEST. 
: s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
3377 O11544 104011 ERROR 11 ;/WE SEEM TO HAVE GENERATED 
3378 * /ANOTHER 100HZ PULSE ON 
3379 : ONLY 9999 MAINTENANCE 
3380 /OSC PULSES. 
;  SSSSSSSSSSSSSSSSSSSSSSSS)>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
3384 011546 00S077 167624 cs: CLR JASR s/CLEAR THE CSR. 
3386 
3387 


3388 5 RERRRRELERA RARE EERE ALAA SERRE EEL RE RARE LALA ERA R AEA LLERRERES 


MA - Y11 27¢ -77 
eS alae a cc ee le 
5 #TEST 60 #TEST THE CLOCK’S MODE 2 OPERATION 

ol T WE’ CK MODE 2 OPERATION 

Sse aie 

+ re Re The TO BEGIN COUNTING FROM 

SET HUNT THe ob BIT IS WRITTEN 

4TO A ZERO THE CONTI NG AFTER 

: #OVERFL LOW AN IGGER 2 

5 (WHEN T2 GO S DATA TO 


sone cv Soria tee 
Et Blt EE PARE he ES 0 


a Sata aren 


SeceRecRceas eRe ReaS 


011552 o00004 +é1 
011554 012737 o00020 001160 MOV 820, STIMES ;;D0 20 ITERATIONS - 
oe 
011562 005077 167610 CLR aASR par ne Se . 
3410 011566 > CLEAR PRESET REG. 
sid pt 1258 B37 iS 167576 abt $G0401S, AASR ig T CLOCK. 
3413 011600 012700 177754 1$: MOV 8-20. ;SET TO GIVE 20 MAINTENANCE OSC. 
3414 011604 052777 O02000 167564 25: BIS sTi0 SASR SRENERATE A MAINTERANEE osc. 
3415 O11612 005200 INC RO 
sib 011614 001373 BNE 2s IF NOT DONE 20 TIMES, LOOP. 
318 011616 052777 001000 167552 3S: BIS BITS, SAGR ;HERE'S THE BIGGIE! AN ST2_ HAS BEEN GENERATED 
ae 8 . 
Ss 2 br | nce 
1 O1164 1126 0011 CMP : T DID A T T BUFFER OCCUR? 
see 011646 001402 BEQ YES = NEXT ST. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2 O11650 104005 ERROR 3A T T BUFF T 
z z 5 : COUNTER TO PRESE ER DID NO 
ss SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
3431 011652 000434 BR 55 
au35 011654 u§: 
3434 011654 017746 167516 Hoy ASR, =(6 -(6) s/SANE CSR 
Pe tie Gee ime EE ibn Tero GAN MOST 2, vo ue,orsn teem os 
3438 011700 4 : . 
3439 = im awe wand ;/THIS MUS Oo ee mn 
a4 inte R TO XEERR COUNTER 
3442 011706 052777 O01000 167462 BIS #BIT9, ASR */GENERATE ON ST2 PULSE 


Qo 
a 
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il T&0 #TEST THE CLOCK’S MODE 2 OPERATION 
011714 017737 167460 001126 MOV JABR, SBDDAT ;/READ THE preset BUFFER, 
1172 012677 167¥50 HOY (6+, 9ASR ;/CONT NTENTS f ARE IN Se00AT. ae 
51388 $o3935 001124 001126 CMP Scoot, SBDDAT i THE COUNTER ACCIDENTLY ZEROED? 
011740 001401 BEQ :NO - NEXT TEST 
;  SSSSSSSSSESSSSSSSSSSSSSS>>> ERROR << <(SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
104005 ERROR 5 ; THE COUNT REGISTER SHOULD NOT 
*HAVE BEEN EFFECTED BY THE STe 
*IN MODE 2. 
: s SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
Ss: 
SHREK AAAAARASSKET REA SSRSRSLEERAARSRAASS SERRE LE RA AAA REAR AEEEEE 
kT TEST 61 *TEST THE CLOCK’S MODE 3 OPERATION 
IN THIS TEST WE'LL CHECK MODE 3 OPERATION. 
*4MODE 3 IS JUST LIKE MODE “EXCEPT THAT THE COUNT 
j #REG IS ZEROED AFTER AN ST 
ee tt RL tA i ai ia 
011744 o00004 tSTb1: SCOPE 
011746 012737 oo0020 #20, STIMES ;;D0 20 ITERATIONS 
011754 005077 167416 CLR ASR ;CLEAR THE CSR. 
011760 005077 167414 CLR ABR *CLEAR THE BUFFER REG. 
011764 012777 017 MOV #4017, aASR START CLOCK. 
011772 012700 17775 1$: MOV #-20. .RO ;SET TO GIVE 20 MAINTENANCE OSC. 
011776 052777 Oo2000 2s: BIS #81710, JASR *GENERATE A MAINTENANCE OSC. 
012004 005200 INC RO 
012006 001373 BNE 25 ;IF NOT DONE 20 TIMES, LOOP. 
012010 052777 001009 3S: BIS #8179, DASR ;HERE’S THE BIGGIE! AN ST2 HAS BEEN GENERATED 
012016 012737 oo00002 MOV #2, SGODAT ‘THE PRESET BUFFER SHOULD BE 2. f 
012024 017737 167350 MOV JABR, SBODAT *READ THE PRESET BUFFER. 
012032 023737 001126 CMP SEODAT, SGDDAT DID A COUNTER TO PRESET BUFFER OCCUR? 
012040 00140e BEQ YES - NEXT SUBTEST. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
104005 ERROR 5 ;A COUNTER TO PRESET BUFFER DID NOT 
*HAPPEN PROPERLY. 
“ ; : SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
poow4s lt’ 1 gr TST62 - 
> 
908037 901124 4$:" CLR $GDDAT ;EXPECT ZERC BACK FROM COUNT REG. 
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#TEST THE CLOCK’S MODE 3 OPERATION 


) 
001424 MOV (6), $TMP3 */GET COR 
001424 BIC #177707,$TMP3 =: /SAVE RA TE BITS 
005 0014 BIS 61711361 T2!B1T0° STMP3 ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
001424 167272 MOV STMP3, JASR >/LOAD C 
;/THIS nist BE DONE IN 
*/ORDER TO XFERR COUNTER 
:/T0 ON STe. 
001000 167264 BIS #8179, JASR */GENERATE ON ST2 PULSE 
167262 001126 MOV ABR, $BDDAT ;/READ THE PRESET BUFFER, 
. :/PREVIOUS COUN 
167252 MOV (6)+, MASR ; CONTENTS ARE IN SBDDAT. 
001126 TST SBDDAT TORE C 
BEQ c$ TF SO - NEXT TEST. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 5 s THE CLOCK FORGOT TO ZERO THE COUNT 
"REG. AFTER AN ST2 OCCURRED ON 
*@ MODE 3 COUNT. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
cs BR TST62 33 : 
167234 f CLR ASR ;NOW TRY CLEARING THE CSR. 
167230 001126 MOV JASR, SBDDAT *READ THE CSR - DID IT CLEAR? 
BEQ TSTb2 : 
001124 CLR SGDDAT tio - RECORD S/B. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;CSR FAILED TO CLEAR 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
sEXSLSRERA KLASSE REESE SESERRSE ESA RS ESE SRSRAEKREH SE CERER RESELL LEERY 
ikTest 62 #IF ENABLED, CHECK THRESHOLD ST1 FROM TESTOR 
STTETTTSTTTT TTT TEST SLT TTT T TTT T PTT TTT TTT TESTS ESTES TS TT STE ST TTT 
+éT62: SCOPE 
po00002 001160 MOV #2, STIMES : ITERATIONS. 
001440 TST EXS ‘ bPeRaTING IN TESTOR MODE? 
BNE 4g YES DO THIS TEST. 
013016 IMP ENDP  NO-END pass 
167170 CLR ASR sYES-CLEAR CSR. 
177775 167164 MOV #-3, JABR ‘SET 19 COUNT THREE TINES. 
000061 167154 MOV #61’ ASR *SET RATE: ST1,MODE 1 
012230 TYPE 65$ i TYPE ofegle otk Str RING 


BR 64S CIz 
5658: -ASCIZ <200><7><7>eseT Sti THRESHOLE pot FULLY COUNTERCLOCKWIZE. . #<7> 


106 
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DVKWAB.P11 Té2 #IF ENABLED,CHECK THRESHOLD ST1 FROM TESTOR 


12314 64S: 
3223 pigsty 004737 013700 JSR PC, ANYKEY -TYPE LAST MESSAGE,AND WAIT FOR OPERATER. 
3553 012320 O1 177775 001124 MOV 8-3, SGDDAT :DON’T EXPECT COUNT TO CHANGE. 
3554 12326 ot ig7o44 MOV aASR, -(6) i7SBvE CS CSR 
3555 01 11 1424 MOV (6) $THeS :/GET CSR 
3556 012336 042737 177707 001424 BIC #177707, STMP3 scone RATE ITS. 
3557 012344 37 O04005 BIS 61711 $61 Te!B1T0, § MODE 2, NO RATE,DISABLE INTERNAL OSC 
3558 012352 013777 UOl4e4 167016 MOV STMP3, JASR CSR. 
3659 ;/THIS is DONE IN 
3560 */ORDER TO 
3561 :/T0 ON ST2. 
sob 012360 001000 167010 BIS #8179, JASR 3/ ON STe PULSE 
012366 017737 167006 001126 MOV ABR, SBDDAT 3 /RE PRESE . 
3564 */PREVIOUS COUNTER 
3565 012374 012677 166776 MOV (6)+, ASR */CONTENTS ARE IN SBDDAT. 
3566 012400 005737 001126 TST SBDDAT * /RESTORE CSR 
3567 012404 001002 BNE 2s IF NON-ZERO,WE’RE OK. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << «SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
3571 0124068 104002 ERROR 2 ; COUNTERCL OCKWIZE THRESHOLD SETTING 
3572 OF ST1 SHOULD HAVE INHIBITED 
373 :ST1 rho CAUSEING CLOCK TO COUNT. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS)>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
3577 012410 o00463 BR TST63 +3 
3278 012412 2s: 
3580 Ole412 104401 012420 TYPE 67S 5s TYPE ASCIZ STRING 
3581 012416 900425 BR 66S “GET OVER THE ASCIZ 
3582 ai i878: "ASCIZ <200><7><7>4SET St] THRESHOLD POT FULLY CLOCKWIZEs 
sega ois 004737 013700 3S: JSR PC. ANYKEY ;TYPE LAST MESS. AND WAIT FOR OPERATOR. 
3585 012476 Ol 166674 MOV QASR,-(6) -~ ; VE CSR 
3586 012502 011637 001424 v (6). $TMP3 :/GET CSR. 
3587 012506 042737 177707 O01424 BIC #177707, $1 MP3: /SAVE RATE BITS. 
3588 012514 052737 OO400S O014e4 BIS #8IT11 (Aue STMP3S ;/SET MODE 2, NO RATE,DISABLE INTERNAL OSC 
3589 OleSe2 013777 O01424 i6bE46 MOV STMP3, /LOAD CSR. 
3590 ;/THIS nist BE DONE IN 
3591 ZORDER TO O_XFERR COUNTER 
3592 +, TO BUFFER ON ST2. 
3593 012530 001000 166640 BIS #B1T9,0ASR - ;/GENERATE ON ST2 PULSE 
2034 012536 017737 166636 001126 MOV JABR, $BDDAT Vee PRESET BUFFER, 
35% 012544 012677 166626 MOV (6)+, JASR :/CONTENTS ARE IN SBDDAT. 
3597 012550 005737 001126 TST DAT ;/RESTORE CSR 
38 012554 001001 BNE TST63 +3 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
3602 012556 104002 ERROR 2 sCLOCKWIZE THRESHOLD SETTING OF 


3603 4 SFr. ;ST1 SHOULD HAVE INHIBITED CLOCK 
3604 ee ;FROM COUNTING. 
Bee Eg 





ee ett how * 
3605 


na sa ea 
WONT ULC WHO 


Soh | S2egueRRE DRC RR CRONOIER 


RRR 
REoOw-—o 


3658 


peeneess sees 
ruru 
SaRONSRN REoRS 


005777 
100401 


104006 


MACY 11 
*IF 


oe 


= 
9 


8 
8 


_— 
e 
_ 
Tw 


166364 


(665) 


»CHECK T 


001160 


166570 
166560 


001424 
001424 
166422 


166414 
001126 


JOE 


21-FEB-77 14:43 


74 
SHOLD ST1 FROM TESTOR 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


iATEsT 62. SIF ENABLED, CHECK STI STe IN FROM TESTOR 
| andetbesayesntsncenneavedvenvenvenebareaneansenenssaaneateates 
#2, STIMES ;;D0 2 ITERATIONS 
TST EXS ;OPERATING IN TESTOR MODE? 
BEQ ENDP *NO-EXIT THIS TEST. 
CLR ASR ; CLEAR THE CSR 
MOV #-3, JABR :SET TO COUNT THREE TIMES 
MOV #61. ASR jSET RATE:ST1, MODEL, GO 
ore bss i igre sfskte, STRING 
iiss: “ASCIZ <200><7><7>8SET St1 THRESHOLD POT IN THE MIDOLE OF ITS RANGE. # 
ao oe PC, ANYKEY ;TYPE LAST MESS WAITE FOR OPERATOR. 
. fo, sEXPECT COUNTER TO BE CLEAR 
MOV (6) aes /GET CSR. 
BIC #177707, STMP3 _:/SAVE RATE BITS. 
BIS saiTi1(BiTera1T0° STMP3 i/SET MODE 2, NO RATE,DISABLE INTERNA OSC 
MOV STMP3, JASR OAD CSR. 
;/THIS Mist BE BE DONE IN 
i /OROER TO_XEERR COUNTER 
BIS #BIT9, JASR + GENERATE ON ST2 PULSE 
MOV ABR, $BDDAT ;/READ THE PRESET BUFFER, 
;/PREVIOUS COUNTER 
MOV (6)+. JASR ;/CONTENTS ARE IN SBDDAT. 
TST SBDDAT > /RESTORE CSR 
awe a :OF NON-ZERO - REPORT ERROR 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR «<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 


2 ; INCORRECT # OF ST1’S 
;RECEIVED BY CLOCK 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


TST 
BMI 


ENDP 


dASR ;DID ST2 FLG SET? 
ENOP 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 


6 ;ST2 FLAG DID SET EVEN THOUGH 
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SIF ENABLER’ CHEEK STLSt2 IN FROM TESTOR 


;SWITCH WAS TOGGLED. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


DETERMINE IF WE ARE ALLOWE I 
fad a PND NSut IP THERE DRE BTHER CLO OCKe BUT THERE 
b 
ENDP: SCOPE 
001215 TSTB = SENVM ;SEE IF APT WILL LET UP AUTO-SIZE. 
BMI 2s :NO = EXIT. 
001434 001436 cH HOEVCT, TSTCNT s TESTED MAX. UNITS? 
001426 ASL ROTATE *POINT NEXT UNIT. 
000004 001376 ADD 0 BASE ADDR. 
goog MOV FRAVEC mid sive CONTENTS OF LOC 4. 
13234 000004 MOV #15, ERRVE T UP IN CASE NO MORE CLOCKS. 
166304 TST JASR ;TIME OUT HERE IF NO MORE CLOCKS. 
sIF HERE, ANOTHER CLOCK FOUND. 
001202 TST PASS :IS THIS 1ST PASS? 
001426 001430 « Bi oe, UTEST GT Or THIS UNIT. 
013114 i TYPE 65S $3 ; TYPE fei STRING, 
jigs: "ASCIZ <15><12>"UNIT a’ 
001204 “MOV SDEVCT, -(SP) s3SAVE S SDEVCT FOR TYPEOUT 
TYPOC GO T Yee -7OCTAL Agctt CALL DIGITS) 
ae oR es HI TYPE ascig STRING ASCIZ 
i878: -ASCIZ " COMPLETED” °” 
001204 “INC SDEVCT 
013170 TYPE 69$ i; TYPE ASCIZ STRING. 
jigs: .ASCIZ Fin UNIT #*° 
001204 "MoV SDEVCT,-(SP)  ;;SAVE SDEVCT FOR TYPEOUT 
004 nove’ (6)+, ERRVEC RESET “Toe 4 Cs ee 
000010 o0140e2 ADD #10, YECTI ; UPDATE VECTOR “ADDR. 
002274 IMP LOOP -TEST NEW UNIT. 
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DVKWAB. P11 T63 OS MeEeK sTl, ote IN FROM TEST 
013234 1S: 
132 oo0004 ADD #4, SP ;/ADD #4 TO STACK POINTER. 
13240 O01 g0000% MOV (634+, ERRVEC sRESTORE LOC 4 
13244 37 001204 CMP #0, SDEVCT TESTED ONLY ONE UNIT? 
13252 001424 BEQ 2s *YES - NO NEED FOR TYPEOUT 
ne - 
1 104401 013262 TYPE 71$ ;;TYPE ASCIZ STRING 
013260 O0040S BR 05 : :GET OVER THE ASCIZ 
: gutta -ASCIZ <15><12>"UNIT &” 
135) 013746 001204 "MOV SDEVCT, -(SP) 33 SAVE SDEVCT FOR TYPE 
13309 fouup 013310 TYPE’. 738 160 Fvee-- Sera. asc T ALL asites 
013306 boo4oe a , _ X *:GET OVER THE ASCIZ 
013324 bigs has 
13324 013737 001250 001376 2S MOV SBASE , ASR 
13332 013737 001244 001402 MOV SvECTI, vecTl 
133940 013737 001604 001442 HOY SDEVCT,L LCNT 
Bt 3e8 B35 ie 001204 MOV #0, SDEVCT 
013369 005037 001434 CLR MDEVCT ;BEGIN TESTING 1ST UNIT. 
013364 012737 000001 o01426 MOV #1, ROTATE POINT 
.SBTTL END OF PASS ROUTINE 
he men ge gr te gece ee ++ +: sgeeeneanemrmeneenamnnmmrmeney iettet 
ILINCREMENT T THE PASS NUMBER ( Ss) 
IF THERES A MONITOR GO TO I 
:#IF THERE ISN’T JUMP TO LOOP 
013372 SEOP: 
01337e NOP 
1 001102 CLR TSTNM $376R0 TE THE TEST NUMBER 
1 001160 CLR TIMES THE NUMBER OF ITERATIONS 
1 005237 001202 INC SPASS Bevel NT on PASS NUMBER 
13410 042737 100000 o01202 BIC #190000, SPASS 3 A NEG. NUMBER 
13416 005327 DEC 
1 1 SEOPCT: .WORD ‘ti 
1 lee BGT SDOAGN Se 
13424 012737 MOV (PC)+,a(PC)+  3;RESTORE COUNTER 
Oi seb 909001 SENDCT: .WORD 1 
134 13420 SEOPCT 
013432 104401 013440 TYPE bss 33 TYPE ASCIZ STRING 
1 BR bus sGET OVER THE ASCIZ 
nonlin: j4ess: “ASCIZ <15><12> #ENDPASS’ 
013454 013746 001202 “MOV SPASS, -(SP) + 8RV5 SPASS FOR TYPEOUT 
O13460 1 TYPOC GO TYPE--OCTAL ASCII(ALL DIGITS) 


eat an 


Lhe 


SLL LL eran ets 


ee ee ee ee 


DOD NOU wre 


B 





; tt 


= 


z 
: 
: 
a 
ee 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


ae 013470 
O08 001432 


013526 


2 
ceed SeeugES3 


ANYKEY: 
bigs 
18: 


. SBTTL 


TYPE 
BR 
-ASCIZ 


MO6 
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67S s;TYPE ASCIZ STRING 
+:GET OVER ASCIZ 
# TOTAL ERRORS '& 
ERCNT, -(SP) : FOR OUT 
$8 GyPEs “OCTAL ASCII(ALL DIGITS) 
69S ii TYPE ASCIZ STR] 
GET OVER ASCIZ 
8; THERE ARE 8° 
LNT, -(SP) CNT FOR TYPE 
ie Pat ro DIGITS) 
71S jj TYPE ASC ASCI 
> GET 
# (OCTAL) UNITS: & 
73S ss TYPE ASCIZ STRING 
225 * GET ASCIZ 
(B00) 8THE GOOD UNITS (L TO R) ® 
UTEST, -(SP) es ST FOR TYPEOUT 
: $53 S PEN BINARY ASCII 
gene ane 3;GET orgy Me ADDRESS 
1 POS THE WORD 
PC, (RO) >:G0 TO MONITOR 
;;SAVE ROOM 
;;FOR 
3;ACTII1 
a(PC)+ ; ;RETURN 
LOOP 
-1,-1,0 s NULL CHARACTER STRING 


THIS ROUTINE TYPES LAST MESSAGE AND WAITS FOR AN OPERATOR 
RESPONCE. 


; CLEAR TTY READY FLAG. 
; STRI 


C12 
C380) <7) aSWITCH ét13 TIMES, TYPE ANY KEY WHEN DONE. .#<7> 


aSTKS 
TKB 


;WAIT FOR OPERATOR. 
;CLEAR TTY READY FLAG. 


'1/0 SIGNAL TEST #1 ST1 IN AND ST2 OUT IN AND OUT 


NO6 


Baer $170 SIGNAL TEST 41 STi IN AND Ste OUT IN AND OUT 


i SHITCH PACK S2 MUST BE SET UP AS FOLLONS: 
SWITCH 


we 4 m ROEDOLES AND POSITIVE SLOPE FOR 


i PLEASE REMOVE ANY PREVIOUS JUMPER. 
i JUMPER THE FOLLOWING PINS TOGETHER: 

J1 - SS (ST2 OUT) TO Jl - W (ST1-IN) 
OAD_AND "Docu AT LOCATION 210 


poe REPORTED AS IN THE REGULAR C COGie TEST AND 


; THEIR PRINTOUT MAY BE INHIBITED 


258 

we 
aa : 

ee 

a 

a 

2 

ae 


1 
1 T 
1 6 CLEAR THE BUFFER REG. 
14020 01 booeer 165350 MOV #61, 3ASR ;RATE ST1, MODE 0, GO 
14026 052777 001000 165342 BIS #B1T9, DASR *GENERATE A MAINTENANCE ST2 
14034 012777 Bpabee 165334 MOV #5, JASR : TO READ C G 
14O%e 001000 165326 BIS #BITS, JASR >FORCE COUNT - BUFFER REG. 
1 165324 1 CMP JABR, $1 *DID COUNT REG ADVANCE ONCE? 
14056, 001753 BEQ 10TSt1 “YES - L 
O14060 04000 ERROR :ST2 OUT TO ST1 IN FAILED. 
1 l BR I0TST1 
" oe 
.SBTTL *1/0 SIGNAL TEST #2 CLOCK OVFLOW OUT TEST. 


ISWITCH PACK S2 MUST BE SET UP AS FOLLOWS: 
SWITCH 1 - OFF 


+] 

; 

; 

; 

; 4 - ON 
: 5 

; 

: 





: THIS SELECTS TTL THRESHOLDS AND POSITIVE SLOPE FOR 


MAINDEC-11-DVKWA-B 
DVKWAB.P11 


IMMERSE Seasons 


BURRS ERE SeSaRIRREOBESRRTER TESTS 


OoOOO0O000O000 
SLLCECLL&£ 


oe 
oe 


SR2I5 ERS 


100757 
104000 
000755 


o 


777 
777 
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31/0 SIGNAL TEST #2 CLOCK OVFLOW OUT TEST. 


; SCHMITT TRIGGER 2. 
{ PLEASE REMOVE ANY PREVIOUS JUMPER. 
t JUMPER THE FOLLOWING PINS TOGETHER: 
Ji - RR (CLK OV) TO Jl - TT (ST2-IN) 
LOAD AND START AT LOCATION 214. 
;END PASSES OCCUR IMMEDIATELY AND ARE NOT REPORTED. 


ERRORS ARE REPORTED AS IN TH REGULAR LOGIC TEST AND 
;THEIR PRINTOUT MAY BE INHIBITED. 


Wa 


10TST2: &KSUR ; CHECK 
165304 CLR ASR ; CLEAR THE CSR. 
177777 165300 MOV #-1, 0ABR *PRELOAD PRESET BUFFER. 
000063 165270 MOV #63, ASR “RATE ST1, MODE 1, GO. 
000400 165262 BIS #8118, JASR + CENERATE” A MAIN. ST1. 
NOP 
165252 TST ASR iD1D OVERFLOW SET ST2 FLAG? 
BMI 10TSTe2 LO 
ERROR ori OV OUT TO ST2 IN FAILED. 
BR 10TSTe * LOOP 
.SBTTL 1/0 SIGNAL TEST #3 ST1 OUT AND ST2 IN 
; 
SWITCH PACK S2 MUST BE SET UP AS FOLLOWS: 
: SWITCH 1 - OFF 
; - OFF 
; 3 - OFF 
3 4 - ON 
: S - ON 
: - ON 
; ? = NOT USED 
: THIS SELECTS TTL THRESHOLD AND POSITIVE SLOPE FOR 
: SCHMITT TRIGGER 2. 
i PLEASE REMOVE ANY PREVIOUS JUMPERS. 
{JUMPER THE FOLLOWING PINS TOGETHER: 
Ji - WW (ST1 OUT) TO J1 - TT (ST2-IN) 
= AND START AT LOCATION 220 
*END PASSES OCCUR IMMEDIATELY AND ARE NOT REPORTED 
“ERRORS ARE REPORTED AS IN THE REGULAR LOGIC TEST AND 
‘THEIR PRINTOUT MAY BE INHIBITED 
I0TST3: CKSWR ;CHECK THE SWR 
000001 165234 MOV #1, 2ASR *SET GO BIT. 


000400 165226 BIS #8178, JASR ;GENERATE A MAIN. STL. 


CO? 


MAINDEC-11-DVKWA-B MACY11 27(665) 21-FEB-77 14:43 PAGE 80 
DVKWAB.P11 31/0 SIGNAL TEST #3 ST1 OUT AND ST2 IN 
3929 14150 005777 165222 | TST aASR sDID ST2 FLAG SET? 
3930 014154 100401 BMI 1S 
3931 014156 104000 ERROR ;ST1 OUT TO ST2 IN FAILED 
3335 014160 032777 010000 165219 1S: BIT #81712, dASR :DID “FOR” BIT SET? 
3934 014166 00176 BEQ 10TST3 NO - ! 
3335 014170 1 ERROR "FOR" BIT SET ON ONLY 1 STe. 
$336 014172 000757 BR 10TST3 LOOP 
3938 .SBTTL ‘ 
3939 :SBTTL #SYSMAC ROUTINES 
3340 > SBTTL 
se .SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
3944 gz KEE RSERESLSARRS KERR ERESESKE RSE UK ERLE LEAS SREL RRL ELS SHER RES LESSER 
394S *&THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6&-DIGIT 
3946 *#OCTAL (ASCII) NUMBER AND TYPE IT. 
3347 j #STYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMSER OF DIGITS TO TYPE 
3949 :* = MOV NUM, -(SP) ;;NUMBER TO BE TYPED 
3950 3% TYPOS 3;CALL FOR TYPEOUT 
3951 iH .BYTE ON *:N=1 TO & FOR NUMBER OF DIGITS TO TYPE 
3952 1% “BYTE MM :M=1 OR 
3953 2% ;;1=TYPE LEADING ZEROS 
3954 is ::O=SUPPRESS LEADING ZEROS 
seep ae :#STYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
3958 > | adh ates 
3959 7# = «MOV NUM, -(SP) ;;NUMBER TO BE TYPED 
a0 i# TYPON ;;CALL FOR TYPEOQUT 
3366 j #STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
3964 :# MOV NUM, -(SP) ;;NUMBER TO BE TYPED 
3965 # TYPOC *:CALL FOR TYPEOUT 
3365 014174 017646 STYPOS: MOV a(SP),-(SP) ;;PICKUP THE MODE 
3968 014200 116637 000001 014417 MOVB 1(SP);SOFILL 3;LOAD ZERO FILL SWITCH 
3969 O14206 112637 014421 MOVB  (SP)+.SOMODE+1 ;;NUMBER OF DIGITS TO TYPE 
3370 Oivele 062716 ROD #2, (SP) *:ADJUST RETURN ADDRESS 
3972 014220 te? % 000001 014417 STYPOC: MOVB #1,SOFILL 3;3ET THE ZERO FILL SWITCH 
3973 O14226 112737 O00006 014421 MOVB 8&6, SOMODE+1 SET FOR SIX(6) DIGITS 
3974 014234 16737 O0000S O14416 STYPON: MOVB  85,SOCNT *:SET THE ITERATION COUNT 
3975 014242 010346 MOV R3,-(SP) > :SAVE R39 
3376 14244 010446 MOV RY; -(SP) >:SAVE RY 
1isce 10546 MOV RS, -(SP) ;;SAVE_RS 
3378 1ies0 113704 014421 OVE SOMODE+1,R4 ::GET THE NUMBER OF DIGITS TO TYPE 
3980 014256 062704 op0006 ADD #6,R4 ;;SUBTRACT IT FOR MAX. ALLOWED 
3981 O14262 110437 014420 MOVB -R4’ SOMODE >:SAVE IT FOR 
3982 014266 113704 O14417 MOVB  SOFILL,R4 +:GET THE ZERO FILL SWITCH 


DO? : 
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DVKWAB.P11 BINARY TO OCTAL (ASCII) AND TYPE 
3983 014272 016605 o00012 MOV 12(SP),RS 5 ;PICKUP THE INPUT NUMBER 
3384 14 d05003 CLR R3 3 ;CLEAR THE OUTPUT, WORD 
14 1 1S: ROL RS >:ROTATE MSB INTO “C” 
3986 014302 OO0404 BR 3$ :G0 DO 
$387 14304 006105 2s: ROL RS FORM THIS DIGIT 
14 0061 ROL RS 
3989 01431 105 ROL RS 
3990 014312 010503 MOV R5,R3 
$331 014314 006103 23S: ROL R3 ;;GET LSB OF THIS DIGIT 
014316 105337 014420 DECB = SOMODE :: TYPE THIS DIGIT? 
3993 014322 100016 BPL 7$ BR IF NO 
3994 014324 042703 177770 BIC #177770,R3 :GET RID OF JUNK 
3995 014330 001002 BNE 4§ °: TEST FOR O 
39% 014332 005704 TST RY >:SUPPRESS THIS 0? 
3997 014334 001403 BEQ cS ::BR IF YES 
3998 014336 005204 4g: INC RY DON’T SUPPRESS ANYMORE 0’°S 
3999 014340 052703 - BIS #’0,R3 *:MAKE THIS DIGIT 
4000 014344 052703 OO0040 cS: BIS #’ °R3 js MAKE ASCII IF NOT ALREADY 
4001 014350 110337 014414 MOVB RB, BS He FOR TYPING 
4002 014354 104401 014414 TYPE a$ ::G0 TYPE THIS DIGIT 
4003 014360 105337 014416 7S: DECB  - SOCNT >:COUNT BY 1 
4004 014364 003347 BGT 2 ::BR IF MORE TO DO 
400S 014366 002402 BLT 6$ *:BR IF DONE 
4006 014370 O0S204 INC RY INSURE LAST DIGIT ISN’T A BLANK 
4007 014372 000744 BR 2s *:G0 DO THE LAST DIGIT 
4008 014374 012605 6S: MOV (SP)+,RS > RESTORE RS 
4009 014376 012604 MOV (5P)+)R4 j jRESTORE RY 
4010 O14400 012603 MOV (5P)+°R3 * RESTORE 
4011 O14402 O16666 oO00002 o00004 MOV 2(SP);4(SP) ESET THE STACK FOR RETURNING 
4012 O14410 012616 MOV (SP)+? (SP) 
4013 014412 000002 RTI 33 
4014 014414 000 8S: .BYTE 0 He FOR ASCII DIGIT 
401S 014415 000 "BYTE 0 :: TERMINATOR FOR TYPE ROUTI 
4016 014416 000 SOCNT: {BYTE 0 *:OCTAL DIGIT COUNTER 
4017 014417 000 SOFILL: -BYTE 0 $;ZERO FILL SWITCH 
4018 014420 000000 SOM 0 “NUMBER OF DIGITS TO TYPE 
4019 "SBTTL’ BINARY TO ASCII AND TYPE’ ROUTINE 
4021 | SEKKRKKA SEARS E RELEASE ASAE AAA EAA ERAS FRA RELA AERA ALE RAA RE RARELE 
ype2 IETHIS ROUTINE IS USED TO CHANGE A 16-B1T BINARY NUMBER TO A 16-BIT 
1023 j #BINAR Y-ASCII NUMBER AND TYPE IT. 
4025 i MOV NUMBER, - (SP) i sNUMBER TO BE TYPED 
4086 <i TYPBN : TYPE IT 
4028 O14422 010146 STYPBN: MOV R1,-(SP) ; 3 SAVE Rl ON THE STACK 
4029 014424 016601 000006 MOV 6(SP),R1 j5GET THE INPUT NUMBER 
4030 014430 000261 SEC SET "C™ SO CAN KEEP TRACK OF THE NUMBER OF BITS 
4031 Oise 112737 OO0060 014474 1S: MOVB #0, SBIN ::SET CHARACTER TO AN ASCII “O". 
4032 O14440 006101 ROL Ri *:GET THIS BIT 
4033 014442 001406 BEG 2g ; DONE? 
4034 O14444 105537 014474 ADCB  SBIN :NO--SET THE CHARACTER EQUAL TO THIS BIT 
4035 O144SO 104401 014474 TYPE  ,$BIN 13g0 TYPE THIS BIT 
4036 014454 000241 CLC ‘CLEAR "C” SO CAN KEEP TRACK OF BITS 
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BINARY TO ASCII AND TYPE ROUTINE 
000765 BR 1$ ;;G0 DO THE NEXT BIT 
12601 2s: MOV (SP)+,R1 *:POP THE STACK INTO R1 
16666 00002 o00004 MOV 2(SP);4(SP) ::ADJUST THE STACK 
12616 MOV (SP)+) (SP) 
RTI ;;RETURN TO USER 
000 000 SBIN: .BYTE 0,0 :STORAGE FOR ASCII CHAR. AND TERMINATOR 
.SBTTL ERROR HANDLER ROUTINE 
1 © SEKKKARS RSLS AA AA ALES ALA RAAS AS SRA RARER SAA REA REE LAR ALAA ARAEEEE 
ihr THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
#SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
GO TO SERRTYP ON ERROR 
t STHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
:#SW1S=1 HALT ON 
:#5W13=1 INHIBIT ERROR TYPEOUTS 
> #5W10=1 BELL ON ERROR 
j #SWOS=1 LOOP ON E! 
+i ERROR N ; ;ERROR=EMT AND N=ERROR ITEM NUMBER 
SERROR: 
104407 -" CKSWR ;;TEST FOR CHANGE IN SOFT-SUWR 
105237 001103 7S: INCB  SERFLG :SET THE ERROR FLAG 
001775  BEQ 7§ DON’T LET THE FLAG GO TO ZERO 
013777 001102 164426 MOV STSTNM,@DISPLAY ;;DISPLAY TEST NUMBER AND ERROR FLAG 
032777 002000 164416 BIT #B1T10, aSWR *BELL ON ERROR? 
001402 BEQ 1$ HN - SKIP 
104401 001164 TYPE SBELL *RING BELL 
005237 001112 1S: INC SERTTL *:COUNT THE NUMBER OF ERRORS 
011637 001116 MOV (SP), SERRPC *:GET ADDRESS OF ERROR INSTRUCTION 
162737 O00002 001116 SUB #2, SE 
117737 164344 001114 MOVB  aSERRPC, SITEMB —_ AND SAVE THE ERROR ITEM CODE 
164356 BIT #81713, dSWR ::SKIP TYPEOUT IF SET 
001004 BNE 20$ ;;SKIP_ TYPEQUTS 
004737 014704 ISR PC, SERRTYP :G0 TO USER ERROR ROUTINE 
104401 001171 “ TYPE  ,SCRLF 
122737 000001 001214 CMPB © SAPTENV,SENV =; ;RUNNING IN APT MODE 
001007 BNE 2s : NO SKIP Aer ERROR REPORT 
113737 001114 O14616 MOVE  $ITEMB,21$ ::SEt ITEM NUMBER AS ERROR NUMBER 
004737 016376 ISR PC, SATYY + REPORT COAL ERROR TO APT 
000 218: .BYTE O 
000 "BYTE O 
000777 22: BR 225 ; APT ERROR LOOP 
005777 164312 2S: TST aSWR HALT ON ERROR 
190008 BPL 3$ ::SKIP IF CONTINUE 
9° 
104407 CKSUR TEST FOR CHANGE IN SOFT-SWR 
030772 QO01000 164276 3S: BIT #81703, aSHR {QO ON ERROR SWITCH SET? 
013716 001110 MOV SLPERR, (SP) ::FUDGE RETURN FOR LOOPING 
005737 O0116e2 4g; TST SESCAPE CHECK FOR AN ESCAPE ADDRESS 
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BEQ 

MOV 
Ss: 

INC 

BEC 
10S: 


SescaPe , (SP) 
ERCNT 

10$ 

ERCNT 


ROTATE, UTEST 


i PTaE RETURN ADORESS FOR ESCAPE 


BUT DON'T Le Ce r® IT OVERFLOW. 
OVERFLOW. 


*/KEEP AT 177777 IF 
;/REMOVE UNIT FROM LIST OF GOOD ONES. 
;/EXIT. 


-SBTTL ERROR MESSAGE TYPEOUT ROUTINE 


LTHIS ROUTINE USES THE “ITEM CONTROL BYTE (SITEMG) TO DETERMINE 
THIS ROUTINE USES THE “I 
*#ERROR IS TO BE REPORTED. 


;*AND REPORTS 


SERRTYP: 


1$: DEC 


2S: . WORD 
3S: 


4§: . WORD 
S$: MOV 
6$: 


7$: 


SCRLE 
RO, -(SP: 
RO 


JeSITEMB, RO 
1$ 
SERRPC, - (SP) 
&$ 

RO 

RO 

RO 

SSERRTB. RO 
(Ross 3s 

3$ 

SCRLF 
tRO)+,4S 

53 

0 

SCRLF 

{Ra}, RO 
(SP)+,RO 
SCRLF 

Pc 

3(RO)+, -(SP) 


(RO) 
6$ 


M 
T SREN OB OBTAINS. F 
THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 


(SITEMB) TO DETERMINE WHICH 
THE “ERROR TABLE” (SERRTB), 


s;"CARRIAGE RETURN” & “LINE FEED” 
>:PICKUP THE ITEM INDEX 
;IF ITEM NUMBER IS ZERO, JUST 
+ oe ete PC OF THE ERROR 
Save SERRPC FOR TYPEOUT 


ADDRESS 
3360 + acs ASCIICALL DIGITS) 


8 
is 


GE 
; {ADJUST ute ENOEX SO_THAT IT WILL 
tt OR THE ERROR TABLE 
;;FORM TABLE POINTER 
sPICKUF OE NESSAGE™ POINTER 

POINTER 

tt ‘PE THe 
Seon MESSAGE™ BITE oe GOES HERE 
3 ;°CARRI FEED" 


: E 
Hel ARRIAGE RETURN” & “LINE FEED” 
::PICKUP “DATA TABLE” POINTER 
330 TYPE THE DATA 

RESTORE. 
+] “CARRIAGE RETURN” & “LINE FEED” 
: ;RETURN 
339A Q(RO}+ FOR TY 
::G0 30 Fyee ASCTTCLL DIGITS) 
3318 THERE “OhOTHER: 

‘BR IF NO 


bh be ee ee 
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TYPE 
BR 

8S: -ASCIZ 7 / 
.EVEN 

-SBTTL SCOPE HANDLER ROUTINE 


$TYPE TWO(2) SPACES 
>: TWO(2) SPACES 


ATHIS ROUTINE CONTROLS THE LOOPING OF Ua Te EEE 


: ATHIS ROUT 1 CONTROLS 


LOOPING OF 


SUBTESTS. IT WILL I 


NCREMENT 
:#AND LOAD THE TEST eRe st oon INTO THE DISPLAY REG. (DISPLAY<7:0>) 
: #AND LO T ERROR (SERFLG) INTO DISPLAY< 15:08) 
jATHE MITCH OP TONS I THIS ROUTINE ARE: 
#5W11=1 TNHIBIT ITERATIONS 
; #SWO9= ON 
: #SWO8=1 LOOP ON TEST IN SWR<7:0> 
; #CALL 
3% SCOPE ;; SCOPE=IOT 
SSCOPE: 
CKSUR ;;TEST FOR CHANGE IN SOFT-SWR 
1S BIT #81714, ISWR 5 3LOOP, ON PRESENT TEST? 
BNE SOVER ives TF SW14=1 
-eeeeNSTART OF CODE FOR THE XOR tis ERseuse 
$XTSTR: BR 6$ ss 1F NG ON THE “XOR™ TESTER CHANGE 
>: THIS INSTRUCTION TO A “NOP” (NOP=240) 
MOV O¥ERRVEC -(SP) tt CAVE THE TPOnTENTS OF THE ERROR VECTOR 
MOV SERRVEC 33SET FOR TIMEOUT 
TST iets > TIME OUT ON XOR? 
MOV (SP )+ JSERRVEC 3 3RES TORE THE ERROR VECTOR 
BR sSvLAb *GO TO THE NEXT T 
cS: CMP (SP)+, (SP)+ CLEAR THE STACK APTER A TIME OUT 
MOV (5P)+) J#ERRVEC ;;RESTORE THE ERROR VECTOR 
BR 7§ *LOOP ON NT TEST 
6S: ;#8NB8HEND OF CODE FOR THE XOR’ +ECTERGANES 
BIT #81708, JSWR sLOOP ON SPEC. TEST? 
BEQ 2s i FBR IF NO 
CMPB ss ASWR, STSTNM °ON THE RIGHT TEST?  SWR<7:0> 
BEQ SOVER ::BR IF YES or : 
2s: TSTB  SERFLG HAS AN OCCURRED? 
BEQ 3$ *:BR IF NO 
CMPB  SERMAX,SERFLG ;;MAX. ERRORS FOR THIS TEST OCCURRED? 
BHI 3$ 3;8R iF NO 
BIT #81709, aSWR >:LOOP ON ERROR? 
BEQ 4§ 33BR IF NO 
7S: HOV SLPERR, SLPADR *:SET LOOP ADDRESS TO LAST SCOPE 
4g: CLRB = SERFLG ue THE ERROR F' 
CLR STIMES ster THE NUMBER” OF ITERATIONS TO MAKE 
BR 1$ “ESCAPE TO THE NEXT 
3S: BIT #81T11,aSWR :: INHIBIT ITERATIONS? » 
BNE 1 tap IF YES 
TST $PaASS :: IF FIRST PASS OF PROGRAM 
BEQ 1S tt INHIBIT ITERATIONS 


HO? 
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INC SICNT 3; INCREMENT ITERATION COUNT 
001104 CMP STIMES, SICNT sere THE THE NUMBER OF ITERATIONS MADE 
1104 1S Boy 1 3 x TI pTERAT ION Aire COUNTER 
1160 MOV SMXCNT, STIMES a ire Or TERA ONS TO DO 
SSVLAD: INCB  §TSTNM TEST NUMBERS 
001200 MOVE § §TSTNM, STESTN HS TEST NUMBER IN APT MAILBOX 
MOV (SP), SLPADR is SAVE SCOPE LCOP ADDRESS 
MOV (SP) He OOP ADDRESS 
CLR SESC *:CLEAR THE E' FROM ERROR ADDRESS 
001115 MOVB 81. SERMAX >;ONLY ALLOW ONE (1) ERROR ON NEXT TEST 
163630 SOVER: MOV STSTNM, DISPLAY ;;DISPLAY TEST NUMBER 
HOV SLPADR, (SP) : SFUDGE RETURN ADDRESS 


ee PS 
SMXCNT: ; >:MAX. NUMBER OF ITERATIONS 
-SBTTL TTY INPUT ROUTINE 
gz RLAAARELESSAA LALA EL SAA ARAL ES SAA AAAS RA RAKES RRA LER SRA ARH HSS SESE 
"ENABL LSB 
5p RERRRRE ERAGE ERLE RA RRR EAE EERE EERE ERE E REE ER LEER AEES 
OFTWARE SWITCH REGISTER CHANGE ROUTINE. 
}aROUTINE 18 ENTERED FRON. THe TRAP HANDLER WILL 
j #SERVICE TH THE TEST FOR CHANGE IN SOFTWARE but teH REGISTER TRAP CALL 


OPERATING IN TTY FLAG 
001140 bcKsiR: MP eSUREG. SUR 3318 THE io SELECTED? 
TSTB (a 3; CHAR THER 


BP e 
MOVB betka -(SP) >:SAVE THE CHAR 


BIC afC177 (SP) -:STRIP-OFF THE ASCII 
CMP SP)+ *:1S IT A CONTROL G? 
BNE tee +:NO, RETURN TO USE 
009001 CMPB =: SAUTOB, #1 >;ARE WE RUNNING IN AUTO-MODE? 
BEQ 15$ :;BRANCH IF YES 
TYPE  ,SCNTLG ;;ECHO THE CONTROL-G (1G) 
SGTSWR: TYPE SMSWR 3; TYPE CURRENT CONTENTS 
MOV SWREG, -(SP) *SAVE SWREG FOR ou 
TYPOC 3360 TYPE--OCTAL ASCII(ALL DIGITS) 
TYPE  ,SMNEW *PROMPT FOR NEW SWR 
19S: CLR ~(SP) *:CLEAR COUNTER 
CLR -(SP) 3; THE NEW SWR 
73: TSTB = ASTKS *:CHAR THERE? 
BPL 7§ ::IF NOT TRY AGAIN 


MCVB = JSTKB,-(SP) ;;PICK UP CHAR 
BIC #10177, (SP) *:MAKE IT 7-BIT ASCII 


9S: CMP (SP), #25 3315 IT A _CONTROL-U? 
BNE 1 ;BRANCH IF NOT 
TYPE , SCNTLU 7:YES, ECHO CONTROL-U (tU) 


10? 
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Pll Y INPUT INE 
4253 giswa4 062706 000006 20$: ADD #6, SP ss IGNORE PREVIOUS INPUT 
ige4 15450 000757 BR 19$ :LET’S TRY IT AGAIN 
y 
use gsuse 021627 000015 10$: CMP (SP), #15 3;IS IT A <CR>? 
4258 015456 001022 BNE 16$ +: BRANCH IF NO 
4259 015460 O05 000004 TST 4(SP) :;YES, IS IT THE FIRST CHAR? 
4260 015464 001 BEQ 115 *:BRANCH IF YES 
4261 O15466 016677 OO0002 163444 MOV 2(SP), aSWR ;;SAVE NEW SWR 
4 g1sy74 pee he 000006 11$: ADD #6, SP ;;CLEAR UP STACK 
4 15500 1049401 001171 14$: ‘TYPE SCRLF >:ECHO <CR> AND <LF> 
4264 015504 123727 001135 000001 CMPB = SINTAG, #1 *:RE-ENABLE TTY KBD INTERRUPTS? 
4265 015512 901003 BNE 15$ ::BRANCH IF NOT 
4266 015514 O1 000100 163422 MOV #100, 3STKS RE-ENABLE TTY KBD INTERRUPTS 
4267 O1See 600002 1S$ RTI +: RETURN 
4268 015524 004737 016310 16$ ISR PC, STYPEC *:ECHO CHAR 
4269 015530 021627 O00060 CMP (SP), #60 ::CHAR < 0? 
4270 015534 002420 BLT 18 ;:BRANCH IF YES 
4271 015536 021627 000067 CMP (SP), #67 CHAR > 7? 
i272 O1S5Me 003015 BGT 18 ::BRANCH IF YES 
yp 15544 042726 O00060 BIC #60, (SP)+ >: STRIP-OFF ASCI 
4274 Q155S50 005766 OO0002 TST 2(SP) 3:1S THIS THE FIRST CHAR 
4275 015554 001403 BEQ 175 3 IF YES 
1276 015556 006316 ASL (SP) ::NO, SHIFT PRESENT 
y 015560 006316 ASL (SP) 7: ‘CHAR OVER TO MAKE 
4278 015562 006316 ASL (SP) >: ROOM FOR NEW ONE. 
4279 015564 005266 02 178 I 2(SP) *:KEEP COUNT OF CHAR 
4280 015570 OS6E16 177776 BIS -2(SP), (SP) 7:SET IN NEW CHAR 
4281 015574 000707 7§ +:GET THE NEXT ONE 
4yoB2 015576 104401 001170 18S: TYPE SQUES : TYPE ?<CR><LF> 
4283 015602 000720 20S +: SIMULATE CONTROL-U 
4yogy .DSABL LSB 
dSee 
4287 83 SRARAA RAR LAA E RAE RA AERA AAAS SARA LR AERA AKER KESSEL SEES 
1288 i ATHIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
4599 * ROCHR ;;INPUT A SINGLE CHARACTER FROM THE TTY 
439] i RETURN HERE >: CHARACTER IS ON THE STACK 
4oge 1 ::WITH PARITY BIT STRIPPED OFF 
on . 
4O9C 015604 011646 SRDCHR: MOV (SP), -(SP) ;;PUSH DOWN THE PC 
4296 015606 016666 000004 opD002 MOV 4(SP), 2(SP) ;:SAVE THE PS 
4297 015614 105777 163324 1S: TSTB = AS TKS :WAIT FOR 
4298 015620 100375 BPL 1§ ::A CHARACTER 
4299 015622 117766 163320 oo0004 MOVB  aSTKB,4(SP) *:READ THE TTY 
4300 015630 042766 177600 o00004 BIC ##C<127> 4(SP) $:GET RID OF JUNK IF ANY 
4301 015636 026627 O00004 000023 CMP 4(SP), #23 ::IS IT A CONTROL-S? 
4 015644 001013 BNE 3$ BRANCH IF NO 
4303 O1564%6 105777 163272 2s: TSTB © ASTKS *:WAIT FOR A CHARACTER 
4304 015652 100375 BPL 2s >:LOOP UNTIL ITS THERE 
4305 O15654 117746 163266 MOVB  @S$TKB,-(SP) *:GET CHARACTER 
4306 O15660 042716 177600 BIC #1C17?, (SP) *:MAKE IT 7-BIT ASCII 


JO? 
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Pe Pri ieee INPUT INE 
4307 O01 000021 CMP (SP)+, #21 i318 IT A CONTROL-0? 
4308 0156 1366 BNE 2s :: IF NOT DISCARD IT 
4309 0156 BR 1$ :: YES, RESUME 
4310 015674 000004 O00140 3S: CMP 4(SP), #140 ::1S IT UPPER CASE? 
4311 O1 OoeHG? BLT 4 ::BRANCH IF YES 
4312 O01 000004 000175 CMP 4(SP), #175 21S IT A SPECIAL CHAR? 
4313 16718 003003 BGT 4§ ::BRANCH IF YES 
4314 015714 042766 OO00040 Oo0004 BIC #40, 4(SP) ::MAKE IT UPPER CASE 
4315 015722 O00002 4g: RTI *:GO BACK TO USE 
431 $3 JB HBB HHH HHH HHHH HHH HHHHHH HHH HHH UHHH 
431 :KTHIS ROUTINE WILL INPUT A STRING FROM THE TTY 
4318 ;*CALL: 
4319 + IN ;; INPUT A STRING FROM THE TTY 
4320 + RETURN HERE St ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
432 * tt TERMINATOR WILL BE A BYTE OF ALL 0’S 
4323 015724 010346 SROLIN: MOV R3,-(SP) ; SAVE _R3 
4324 b157e6 012703 016032 1$: MOV aSTTYIN, R3 ::GET ADDRESS 
4325 015732 022703 O16b04e2 2s: CMP #STTYINSS. RS  5;BUFFER FULL? 
4326 015736 101405 BLOS 64'S He YES 
4327 015740 104410 ROCHR *:G0 READ ONE CHARACTER FROM THE TTY 
43208 015742 112613. MOVE  (SP)+,(R3) ::GET CHARACTER 
4329 g1e74 122713" 000177 10$: CMPB #177, ¢R3) 31§ IT @ RUBOUT 
4330 015750 001003 BNE 3$ ::SKIP IF NOT 
4331 015752 104401 001170 4g: TYPE SQUES :: TYPE A'?? 
4332 015756 BR 5 *:CLEAR THE BUFFER AND LOOP 
4333 015760 111337 016030 38: MOVB  (R3),9S ECHO THE CHARACTER 
4334 015764 104401 016030 TYPE 
43395 015770 122723 OO0001S CMPB 4Es«RS,, (R3)+ ;;CHECK FOR RETURN 
4336 g15774 001356 BNE *:LOOP IF NOT RETURN 
4337 015776 1 177777 CLRB - -: 1 (R3) *:CLEAR RETURN (THE 15) 
4338 016002 104401 001172 TYPE :: TYPE A LINE FEED 
4339 016006 012603 MOV (SP)+,R3 +: REST 
4340 016010 011646 MOV (SP). -(SP) ::ADJUST THE STACK AND PUT ADDRESS OF THE 
4341 016012 016666 000004 oD0002 4(SP}.2(SP) 3 FIRST ASCII CHARACTER ON IT 
434, ot 012766 016032 O00004 MO eSTTYIN, 4(SP) 
4343 016026 000002 RTI ; RETURN 
4344 016030 000 Qs: .BYTE 0 STORAGE FOR ASCII CHAR. TO TYPE 
4345S O1b031 000 "BYTE O +: TERMINATOR 
4346 O1 900010 STTYIN: .BLKB 8. : RESERVE 8 BYTES FOR TTY INPUT 
4347 01604 o0s015 000 §CNTLU: [ASCIZ /#u/<15><12>  ;;CONTROL “U" 
4 1604 136 006507 OO00l2 SCNTLG: .ASCIZ /#G/<15><12> ;;CONTROL “G” 
4349 016054 905018 053523 O20l22 SMSWR: .ASCIZ <15><12>/SWR = / 
4350 016062 75 000 
4351 O160e§ 040 047040 OS3S0S SMNEW: .ASCIZ / NEW = / 
4352 016072 036440 B04 
4353 .SBTTL TYPE ROUTINE 
4355 ss EEGGLLELL EGER EEE E EERE AERA R EEE E EER LARA EARS SEES LEELE 
4356 :KROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
4357 S#THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
NO TAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 


4358 ; #NOTEL: eat 
4359 ; #NOTE?: SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
4360 ; #NOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 


es 


016076 
16102 
OIE Los 
ii 
biel 12 
016116 
ie 
eis 
16136 
16142 
Hels 
161 
ft 
sie 
pitie 
16170 
He 
ius 
16204 
Hae 
sie 
Stats 
b1e3o4 
Oitese 
1623e 
16236 
016240 
016244 
Rieses 
bleses 
016262 
016264 
016270 
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oa 


t=] 
el 
oO 
= 


Ba 


ae 


8 


Be 


; 


Ss. 


oa - 

Se ey 
- 

ear =i 


B58 
bigs 


SY 


z 


112716 
004737 
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001157 


000011 


016354 
016310 
001156 


001154 
000001 


016310 
016354 


000040 
016310 


001214 
001215 


001215 
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;# 

; #CALL: 

;#1) USING A wr ee 
jtog TYPE —, MESADR 


; TYPE 

;# MESADR 

;# 

STYPE: TSTB STPFLG 
BPL 1s 
HALT 
BR 3$ 

1$ MOV Rg -(SP) 
MOV tsp) 


RO 
CMPB ss BAPTTENY, SENV 


625 He 

pire #APTSPOOL, SENVM ;; 

MOV RO, 61$ 

JSR PC; SATY3 
61S: .WORD 
625: Bite #APTCSUP, SENVM 
2S: MOVB (RO)+,-(SP) 

BNE 4g 

TST ($+ 
60S: MOV (SP)+,RO 
38: ab #2, (SP) 
4g: CMPB 0s #HT, (SP) 

BEQ 

CMPB CRLF , (SP) 

at (SP)+ 

TYPE 

SCRLF 

cLRE HARCNT 
SS: JSR PC, STYPEC 
6S: CMPB 3s SF ILLC, (SP)+ 

BNE Fa} 

MOV SNULL , -(SP) 
7S: DECB 1 SP) 

BLT bs 


JSR PC, STYPEC 
DECB  SCHARCNT 
BR 7§ 


;HORIZONTAL TAB PROCESSOR 


8: ISR. 


8’ (SP) 
Pc, $TYPEC 


;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


3321S THERE A TERMINAL? 


:38R IF Yes 

*tHALT HERE IF NO TERMINAL 

; ;LEAVE 

+ ay aRORESS OF ASCIZ STRING 
3 ;RUNNING IN APT MODE 

::NO,GO CHECK FOR APT CONSOLE 
is SPOOL TO APT 

33NO OR CONSOLE 
;;SETUP ADDRESS FOR APT 
:: SPOOL TO APT 

a3 SS 

; * aes 


<% 
w 
2 
wv 


: CHARACTER TOBE TYPED ONTO STACK 
srPUSH IT ene THE TERMINATOR 
$3 Fat INATOR POP IT OFF THE STACK 
;:ADJUST RETURN PC 

; ;RETURN 

;;BRANCH IF <HT> 
;;BRANCH IF NOT <CRLF> 


3;POP_ <CR><LF> EQUIV 
3; TYPE A CR AND LF 


;;CLEAR CHARACTER COUNT 
;;GET_NEXT_CHARACTER 


C 
eto uns. 


51ND THE NULL p 
;;D0ES A NULL NEED TO BE TYPED? 
a POP THE NULL OFF OF STACK 


A 
;;D0 NOT COUNT AS A COUNT 


;;REPLACE TAB WITH SPACE 
;; TYPE A SPACE 


ee ee eee 


MAT 


iscsi uateterssse tenet hater 


C-11-DVKWA-B MACY11 27(665) 
"Pil TYPE ROUTINE 
16274 000007 016354 
1 
16304 
16310 1 162634 
ie3ie 1 162626 
! aE ih 
i 016354 
<7eg 00012 000002 
1 
1 
ieee 
16360 11 000001 016624 
16366 16737 000001 O166e2 
teave il 006001 016624 
1404 
1 010046 
1eN18 oer3? O1e622 
a lh 
tease Apr 
bie e739? 000100 on1215 
ie 17258 000004 ne. 
1 bol 174 
pe i 001210 
1 
1 1 001210 
tour Bt 1212 
16500 1 Bpo804 001174 
16510 01 00004 016534 
16516 op0002 900004 
ie thee cer 
ie Bie 
16538 105737 01 
1664 4 
16644 005737 001214 


LO? 
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BITB #7,SCHARCNT 


es F NOT AT 
BNE Ps Net d 
TST tap * :POP SPACE OFF STACK 
BR 3:GET NEXT CHARACTER 
STYPEC: i578 TPS. :WAIT UNTIL PRINTER IS READY | 
MOVB 25) aSTPB ;;LOAD CHAR TO BE TYPED INTO DATA REG. 
CMPB wat 21S CHARACTER A CARRIAGE RETURN? /) 


ae ec A: 


CHARACTER COUNT 
1s Rep SLE SSP) + RT AARACTER A LINE FEED? 
: Bed g VRE tac IF YES ; 
NCB (PC)+ ;;COUNT THE 


a Al -WORD O 
TYPEX: RTS PC 
~SBTTL APT COMMUNICATIONS ROUTINE 

a= SE 6 SE J 4 9 9 9 0 0 a a a 


$ATy1: MOVB &1,SFFLG 3;TO REPORT FATAL E 
SATY3: MOVB $81.SMFLG 3:70 TYPE A MESSAGE 


BR satyc 
SAT vi: MOVE #1,SFFLG ;;TO ONLY REPORT FATAL ERROR 
MOV RO, -(SP) ;;PUSH RO ON ST 
MOV R1,-(SP) ;;PUSH R1_ ON STACK 
ITB SHFLG i SHOUL TYPE A MESSAGE? 
Sree s anna i SOPERATING U wats 
BITB §§ 8APTSPOOL,SENVM ;; “SPOOL MESSAGES? 
BEQ :1F NOT: BR 
AD ORLaCSB IT TUE aes EP RETURN ADDR 
1S: TST SMSGTYPE js SEE IF BONE W/ LAST XMISSION? 
BNE 18 33;IF NOT: WAIT 
MOV RO, SMSGAD + PUT IN MAILBOX 
2s: iste (RO)+ : FIND MESSAGE 
SUB ,RO SUB START OF MESSAGE 
ASR *:GET MESSAGE LNGTH IN WORDS 
MOV RO, SMSGLGT PUT LENGTH IN MAILBOX 
HOV #4; SMSGTYPE *? TELL APT TO TAKE MSG. 
38 MOV D4(SP) 4S ;;PUT MSG ADOR IN JSR LINKAGE 
ADD 4(SP) --BUMP RETURN ADDRESS 
MOV 177776, -(SP) ;;PUSH 177776 ON STACK 
: JSR PC, STYPE >:CALL TYPE MACRO 
S$: —_ 


;;SHOULD REPORT FATAL ERROR? 
Q 12$ tt1F NOT: 
TST = SENV S}RUNNING UNDER APT? 


P+ +: 
an 


= 
2 


Vea 


EEFELES 


Be as fre fae fee feo pas fos ft he Spee 


sihihet es 


Poe ep RS cRC bse RRER ASS CARED RCRSS 


os bs B= fs be bo he 


rarata 
06D NOU £ WT 


oo" 
Coro oy bh 


eseesReone NSS 


a a ee 


dhdninanananan 


RSE 


Opt bee 


MO? 
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T COMMUNICA 
4 oe9 + } id NOT: 
001174 118: 5 TYPE He INISHED T MESSAGE? 
BNE i 33;I1F_ NOT: WA 
1176 MOV (SP), SFATAL 3;GET ERROR 
Bo0008 ADD =: #2, 4 SP) jj SUNP 
D O12 on INC CTYPE 5; TELL 48 0 TAKE ERROR 
ae fe ft, = gee Dore 
1 MOV (SP)+,R1 eae Bex INTO Ri 
1 MOV (SP)+;RO HPop Stack NTO RO 
50C sreic: “prte 0° bi TEScG. FLAG 
nL SLFLG: ‘BYTE 0 +g FLAG 
nNno SFFLG: fa 0 ;;FATAL FLAG 
1 . 
Ra APTSIZE=200 
NV=001 
100 . APTSPOOL=100 


$3 S dehahnlah-Sedelelab-bteh-h-heh-lalalalattalabebelelelalalalalalalalalalalalalalalalalaliishalalalalalalalalalalalalalala 





“POWER DOWN ROUTI 
01 16766 000024 $PWRDN: MOV ist a C ;;SET FOR FAST UP 
oi 37 000026 MOV 5340 SPURVEC+2 ;;PRIO:7 
1 MOV , (SP) PUSH RO ON STACK 
10146 MOV R1,-(5P) PUSH RI ON STACK 
10246 MOV * (SP) PUSH Re ON STACK 
10346 MOV *-(SP) >;PUSH R3 ON 
10446 MOV RY, -(SP) PUSH RY ON STACK 
1 MOV RS, -(SP) PUSH RS ON STACK 
1 62256 MOV gSuR =(SP) PUSH @SWR ON STACK 
1 16776 MOV SSAVR >:SAVE SP 
12737 O16 oo0024 HOV SSPWRUP, J8PWRVEC’;;SET UP VECTOR 
BR “2 ;;HANG UP 


$ ee ee 
SPWRUP: HOV aSILLUP, QUPHRVEC ;:SET FOR FAST DOWN 
ii Y 

CLR SeavRe *:WAIT LOOP FOR THE TT 
1S: Inc SSAVRG jsMAIT FOR THE INC 

MOV (SP)+, ISWR >:POP STACK INTO aSWR 

MOV (SP)+)R5 POP STACK INTO RS 

MOV (5P)+'R4 POP STACK INTO 

MOV (SP)+'R3 ?:POP STACK INTO R3 

MOV {SP)+)Re POP STACK INTO Re 

MOV (SP)+/RI POP STACK INTO RI 

MOV (SP)+’RO POP STACK INTO RO 

MOV #SPWRON, DSPWRVEC’ ; UP THE POWER DOWN VECTOR 

MOV #340, SUPWRVEC+2 ; ;PRIO: 





* : 


. . 


07 


PDS Ren oS BRE gE IT? Se Pe 8 


HTPOMER FAIL. RESSAGE POINTER 


1 
SPWRMG: gi? SPOWER 
SILLUP: HALT POWER UP SEQUENCE WAS ST 
BR 2 i Ger THE POWER DOWN WAS TE 
774 0 047520 042527 SPoueh, -ASCIZ <15><12>"POWER” 


-EVEN 


i STHIS ROUTINE WI PROTECT THE PROGRAM 
j SFROM INTERUPTS ( BaD ONE 


Hie We (ATCA 1S ET WF FOR 
ISR Ro. 


ILLEGAL I TS OR INTERRUPTS TO THE WRONG VECTOR 
;#GOTO THE VECTOR AND PCITK UP THE “.+2” AS AN ADDRESS 


#7 Ria” a APC UIE CL CASE OE euTton OF THE mt of PC,RO” (AN ILLEGAL INSTR.). 
ie oe 10h > a wnt tac ION 4 aUTRAe TO. 
NTER Sar anne 8 HU. ee 0 uth” 4. : 


eke WILL REPOR 
sare PLS CSN Gin occur wo case a Tr 10 


OH ba ho em he ee 


weeewewse 
OK 


Aa eee via tee a ees Maan 


#WE WILL 
A 
1 011637 017050 IOTRD: MOV (6), TRTO ;GET WHERE WE CAME TO. 
17010 162737 000004 017050 SUB #4, TRTO *FORM READ ADDR. 
017016 27 017050 001000 CMP TRTO, #1000 ;DID TRAP FROM LESS THAN ADDR. 1000? 
017024 ae BLE 2s :NO-CONTINUE. 
017026 000000 1S: HALT A BUSS ERROR TIME OUT TRAP BROUGHT US HERE. 
ADDRESS CONTAINED IN TRTO. 
017030 000776 BR 1S ;DON’T ALLOW CONTINUE. 
01 016637 000004 017052 25: MOV 4(6), TRFRO ;GET TRAPPED FROM ADDR. 
4564 B12 040 062706 O00004 ADD #4, SP ;/ADD #4 TO STACK POINTER. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
4568 017044 1 4 RROR! 
i568 04004 ERROR A i Stnie: INTERRUPT OR 


x TA EN METH n ICE UNDER TEST. 


7 


) 
POWER DOWN AND UP ROUTINES 


| 
F ‘ 


e 


eeepReRee 


FEEESSESES 
WO NOU £WrH-O 


‘BSREARDERER 
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sVECTORED TOUIS WIT 
*VECTORS ASSIGNED T 


rae 
8 
m 


BUS DURING THE INTERRUPT 


“L 

;ALSO EXPEC et Le TO 
LL T THAT Me DEVICE DI DIDN’ 

roe THE RECOMMENDED 


PROCEEDURE 
IN THE DOCUMENT (ON THIS DIAGNOSTIC) 
FOR LOOPING ON TEST. 


FOR THIS ERROR - DON’T USE 
OoP OPTION. ae 


; » SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
i) 


RTI 
yee -WORD OQ ;CONTAINS ADDR. TRAPPED OR INTERRUPTED TO. 
RFRO: .WORD 0 ;CONTAINS ADDR. TRAPPED OR INTR. FROM. 


TSeTTL TRAP DECODER 
a gr eg a Rr ae 


THIS ROUTINE WILL PICKUP THE BYTE OF THE “TRAP” INSTRUCTION 
*#AND USE IT TO INDEX THROUGH PROUGH THe Re TABLE FOR THE STARTING ADDRESS 
OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
:#G0 TO THAT ROUTINE. 
STRAP: MOV RO,-(SP) ;;SAVE_RO 
ooo002 MOV 2(5P),RO 3;GET TRAP ADDRESS 
TST -(RO) :;BACKUP BY e 
MOVB (RO), RO :GET RIGHT BYTE OF T 
ASL >:POSITION FOR INDEXING 
017110 MOV STRPAD(RO),RO  ;;INDEX TO TABLE 
RTS RO *:G0 TO ROUTINE 
;;THIS IS USE TO HANDLE THE “GETPRI” MACRO 
STRAP2: MOV (SP), -(SP) ;;MOVE THE PC DOWN 
oo00004 gooo02 MOV 4(SP5,2(SP) i MOVE THE PSW DOWN 
RTI > :RESTORE THE PSW 


-SBSTTL TRAP TABLE 


;#THIS TABLE CONTAINS is STARTING ADDRESSES OF THE ROUTINES CALLED 
;*#BY THE “TRAP” INSTRUCTION. 


CO8 
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TRAP TABLE 


1 


;;CALL=GTSWR  TRAP+6(104406) GET SOFT-SWR SETTING 


SGTSWR 


ae ' 

s85 oe a By. 
o 8 s: 

Piz 2 & > & & s 3 

—e - = ‘ee 

Soe “29 Wg ot Dee foe Bo cee 

é ay § - &£ 5 

EE f & & f i? : 5 OE s & 

a5: EePER Pl eip ota 
» N “XN -— “XN 3 

atts @ a £8 &@8&@ & & & 

a a a ee or oe eo 

SEN  N N NN NN N NN 

i ee ee 
= as ae on a = cu 0 a r.) 
5 PF Oe Seg ee ea 5 &§ 
Bee 8 BBnes oy Shea BuSoZeN 
Bees wee wes Besa = Segitcs arasaies 
Zzee zea E26 BY Bes ES BSRSTESs ret me 
S984 Satedansey SUBUEANEAEN MEANS 
Fata LaySeauewtaras Fe Zeaseees groalsa 


Sciciiintanlls ae ou ios tee 


Qa SS SSSSSSSSSS SSS SSS SS SSS SSNS SSS SSS SSS SSNS 
SOSESESEPTO PEO E ESSE I ED ISI SDE psa aa bSEEIITE 


328 


at 
o 


pes enBaaey 


ONOOOOOOOOOOOOOOOOOO000000 
o 
<£ 


pb se bh be be be 8 hs be be ht be Ps bs db 


PESeeeeeeee 
QERSNSNSSSE «© RORERRE 


ee 
33 
=e 


oO 
aoe 
uw 


2 


ok 


292 
Saar 


= 
r. 


28889 
ae 


: 
g 


See R 
Sr 
5 


o~ 
wo 


a2 
sai 


Or ern 
estes 
: 


— 
o 


R RL2 RP 
peghttgne? 


a 
R cA 


2 RRZRR 
St=tatidete 
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8 
oe 


Ee 


27(665) 


DO8 


21-FEB-77 14:43 PAGE 94 


DH1: -ASCIZ <15><12>#ERRPC ASR WAS 


é 


DHYA:  .ASCIZ <200>#ERRPC 10 


DH12: .ASCIZ <15><12>#ERRPC ASR 


DH20: .ASCIZ <15><12>#ERRPC ASR 2NDCNT 1STNCT 3RDCNT# 


DH26: .ASCIZ <15><1e> C CLOCK ADDR. # 


EVEN 
DT1: -WORD SERRPC,ASR, SBDDAT, SGDDAT ,O 
DT3: -WORD SERRPC,ABR,SBDDAT, SGDDAT,O 
DT4: -WORD SERRPC,TRTO, TRFRO,O 


DT12: .WORD SERRPC,ASR 


,0 
OT20: .WORD SERRPC,ASR,SBDDAT, SGDDAT, STMPO,0 
OT22: .WORD SERRPC,ASR,SBDDAT,STMPO,O 


OT2b: .WORD SERRPC,STMPO,O 
DFO: -WORD 0,0 


-ASCIZ <15><12>#ERRPC ABR WAS 


MAINDEC-11-DVKWA-B 


OVKWAB. P11 
nek 001960 


2 


ees 


2 
x 
Fe 


roy 


APTENV= 000001 
APTSIZ= 000200 
APTSPO= 000100 





8 920 1063 
ica 1 ier 1197# 1248 
ee aS a 
ce ll, St es 
suide 340 3193s 
3890% 4718 
920 963 
920 
920 935 
$20 
3920 
920 
$20 
320 
320 
320 
920 
920 
920 
920 
320 
320 
320 
920 
920 
320 926 
920 962 
320 931 
920 932 
320 323 
320 G43 
320 952 
920 9ss 
920 958 
320 942 
920 950 
920 953 
920 956 
920 928 
320 929 
920 922 
920 343 
920 951 
920 gs4 
920 9S7 
3552 3584 3625 38078 
920 925 
835% 920 1069 
4383 44888 
4076 4376 ss be Is be | 44B6 8 
1133 4485 ¢ 


4378 4446 44878 
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E08 


1735 
2438% 
2884s 
3ee0# 
3563 


aes 


FUS 
SORES Ross ne PEREAL TARP PEFR? ea pace 


as 


ASR 001376 10638 11478 1 1214 1 1287% 12e88% 1 1 1 13328 1 1 
163 14¢6 113, 1378% * | 14228 iio tie 1438% 1 tizFe 
1468% 1470 1483% 1485 15le% 1513% 1515 1 1530 15S57# i558 1 1573# 
ee toe i ieee tis ie) Ie Hess lide live te dese ee 
1833 19le# 13s 183s ieee 19S% 1 1957 1961% eas 1822, 1 sees 
2069% . io ieee. cine Tas o11Ge 2129% ssci8 sizes 2134 sioge elex sine 
ee ee ae 
: Sages | Sud0s : Sess Scg?e Sc35e Sede cute Seu 
esSi# e55S* e558% e2574% e594% 2596% e606 2610% 2613% 2629% eb4e% 
Cb44e seeds e658% 2661% 2664 76% 2684% 2686% sen soca 25t * 
it % 2766% 2789% *# 2802%  2803% cb* e828% 
eeS3% e2e8S4# e8SS* 2857# 2862 2875% 2883% 28878 esss*e 2892 
2896% e903% e914 2921% 2927# 2933 2937 e941% e944"  2956% 
i * i 74% * 2988% 2991% 3011% 3016 3020% 3024s 
¥ * * * ¥ ex 3075% 3100 3104* 3108 
suse sieze slate ase ane sites the 3152% 315ge 159% ai ah 3l 
33355 ¥ Ags 35645 ‘ be » 330 seus : 3s Sees 
3 3367% 70% 3384% S411# 3414* 418% 3434 3438% * 4S% 
34728) 8=6474% )=—3477% «= 481% = 3497 e 3S2ee% 3523 3545% 3547% S4 
3558% 3562%  3565% 3589% 3593% 3596% 3618% 3620% 36 3631% 3635% 3638 
3653 3682% 36 3732%  3848% *  3851% ex  3853% 3891#  3892% 
3927%  3928% 4716 4722 4723 4725 
ASWREG= 920 933 
ATESTN= 920 924 
AUNIT = 000000 920 327 
000000 320 934 
avectis 000440 8348 3 959 1065 1066 1067 1068 
BITO = 000001 8178 1693 1694 1708 1904 1911 1949 956 2131 2137 2175 21% 2240 
2279 2e8S 2307 2337 6 2388 2397 2439 244g 2490 2499 2S41 2550 
96 2605 2 2653 2765 28093 2853 S7 9 88 289s 2924 2936 
cos ag 3103 3151 3187 3236 3272 3323 3362 3437 3590 3557 
BITOO = 000001 807% 817 2105 
BITO1 = 000002 8068 B15 
BIT0e = 805% 81S 
BITO3 = 10 804s 814 
BITOY = 000020 8038 813 
BITOS = OO0040 8028 Ble 
Bt TOS = 000100 8018 811 
BITO7 = 000200 8008 810 
BITOS = nated 7998 803 4180 
BITOS = O01 7988 808 4087 4188 
BIT1 = 000002 8168 1648 1649 1663 2181 
BIT1O = 002000 anon" oat eel Sar, 2974 3011 3058 3095 3142 3179 3227 3264 3312 
BIT11 = 004000 796% 1378 1379 1393 1911 1956 2017 2061 2137 2196 2346 2397 2448 
2499 2550 2605 2653 2887 289s 2923 2936 2968 2983 3019 3052 3067 
3103 ais diel 3187 3221 3236 3272 3305 3323 3362 3437 3500 3857 


GO8 
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Tle = Bx 0000 7958 2017 2061 ese9.s e80S)=S 2809) 2834 = «BESS 39533 
g tS 2 7348 =§=61333 1334 1348 si03 4071 
fit 6 Ra ee 
= 

Bite = 000004 ise 1 1604 618 1911 956 2137 486219 4«€=6©28346)0=s (2397s 4H 
2e08 26S3 Bee 2936 3383 eat 3067 «= 3103S 3151 3187 3236 

173 = 0001 give iss 1s) ies Bese dee 

= 

BIT = poooen 8138 1513 1514 S288 2131 el7S «2240s 2279) 

BITS = OO0040 Biles 1468 1469 1483 = 2131 e175 ee34 Ss eeHO—s«é28799 

BIT& = 000100 Bilis 1423 1424 1438 

BIT? = 000200 8108 

BIT8 = OOO400 8098 2132 2177 2242 2281 e305 2644 2726 3892 3928 

BITS = 001000 ores’ 131? soek 2069 ita site cou set e402 2453 on Ste 
3192 = 3241 3e 3328 8=63367 HIBS SHH HB 3505 3562 3893 

BPTVEC= 000014 8248 

CKSWR = 104407 3847, 3888 «= («3926)=—ssH060 20S «4B 4164 4165 46438 

CR = rent 7328 figs 4432 

CRLF = 7338 =6116 4393 4432 

DDISP = 177570 7398 901 1121 

DFO 017764 988 996 1004 1012 1020 1028 1036 1044 1052 1060 47298 

DH1 017457 986 394 1018 1050 46878 

DHi2 017563 1026 1034 47008 

DH20 017600 1042 47038 

DH26 017641 1058 47098 

DH3 017503 1002s 46918 

DHYA =s-_—« 17527 1010 46958 

DISPLA 001142 9018 il2l# 1129% 4063% 4210# 

DISPRE 000174 7008 1129 

DR 001414 10708 2018 2181 

DR2 001416 10718  2017% £ 

DSWR = 177570 7388 300 

DT1 017666 987 395 1019 47168 

0112 8 §=017722 1027 1035 

DT20 017730 1043-47238 

DT2e2 017744 1051 47258 

DT2b 017756 1059 47278 

DT3 017700 1003 47188 

DT4 017712 1011 47208 

ENTVEC= 000030 8278 1105  1106% 

EMi 017134 985 86 4648 

EM11 017306 1049 4666s 

EMl2@ §=017325 1025 46698... 

EM16 017354 1033 46738 

EMe 017166 993 46518 

EM20 017405 1041 46788 

EMe6 017434 1057 4682 

EM3 017214 1001 46S55% 

EMY 017242 1009 46598 

Ene O10 sue Sele) 36502654 36708 

ERCNT 001432 10778) =61181# 3771 409S*  4097# 


DVKMAB.P1L CROSS REFERENCE. TABLE 
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ERRVEC= 000004 820 118 
3710% 16% 
EXxS 001440 10808 1084 
GNS = #eeeee U ll te 
GTSWR = 104406 1161 46418 
5 gaa" tise 
bret Fin aBN7e 
OTST 711 8 
IOTST 712 8 
IOTVEC= 825% 03% 
LCNT 10818 
LF 7318 
LOOP 74 11858 371 
MDEVCT 10788 1180% 
PC %000007 ait gosee 
PIRQ = 177772 7378 
PIRQVE= 8318 
PRIOR 14le 10698 
PRO = O00000 7548 
PRI = 7558 
aC nee 
= 
PRY os Bo0e00 758 
a4 = 000240 38 
= 000300 
pes So7a7e sous 735 
= 
PSW = 177776 7358 
pavers 8268 1109% 
= 104410 4327 GON4 i 
ROLIN = 104411 464Se@ 
Sia nn ae 
ReTART 002104 703 11688 
RO =%000000 7428 8 2235% 
2597% 2599 
2975* #3008% 
3e61#  3265% 
4llee 41138 
4374 4375% 
Rl “000001 q3a3e 33088 
so % 
Re =%00000e2 # 4497 
7 =o - & 
my =%000004 746% 3976 
BS =%000005 747@ 0 = 39 
+ Bo nm. we 
=) 
cr “000006 


HO8 
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aa 


. 


a oo 
_ 
@ 


be 8 


1130# 
4172 
1093# 


381 


3758% 
4430 


12128 


3792% 
4463 


1140# 
2749% 


1236# 


3797 
4480# 


4S2l# 


2179 


3816% 


4S2e% 


4073# 


4079% 


3540 
4644 


4139% 


FUR 
Town 


4268 


OVKURE PLL oN cRoss REPERCHCE TOBE 


434 
8 "EER 
wvuew 
B Bee 
e 5228 


oF 


Se 


Beahavancaen ® 


= 

= 

= 

= 

= 

= 

= 

= 

= 

= 001000 

= 001 
SWl = 
SW10 = 
SWll = 000 
ails = 010000 
SW13 = 020000 
SW14 = 040000 
SWiS = 100000 
SW2 = OO00004 
a = 000010 

= 000020 
SWS = 000040 
ae = 000100 

= 000200 
Swe s eran 

=s 
Hine! Sa 

= 
TPVEC = 4 

= 
TRF! 17052 
TRIVECS 00075 

= 
TSTCNT 001436 
TSTSTR 1444 
TSTl 002362 
TST10 © 003204 

STi1 003 


97% 
bi 


11# 


1107# 
46038 
4553 


1085# 
10848 


108 
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1088# 


46028 
1092# 


4720 
3677 


es 
4514 


3969 
] 


8 


&  Beae 


segsse 


446 1% 
4502 
4624s 


4166 


JO8 
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003400 
TST13 003476 
TST14 74 
TSTIS 
TST1l 
TSTl o0040S2 
TST EM 
TST 124 
TSTel OO04206 
wer 334 
TST 
TSTe4 
TSTes 
TSTe6 7e 
TSTte7 004726 
TST3 002516 
13130 Soap 
131 OiseNg 
1S133 Ooeses 
TST34 
TST3S O0S62e 
TST36 BP as 
TST37 102 
TST4 002614 
TST4O O06232 
TST41 006362 
TST4e O06S2e2 
TST43 OO6664 
TST44 006724 
TST4S 007044 
LE A, 007150 
TST4Y 007224 
TSTS 002712 
TSTSO 007310 
TSTS1 007402 
TSTS2 007536 
TSTS3 70 
TSTS4 10162 
TSTSS 104S4 
TSTS& O107% 
TSTS7 011240 
Tere S030 
iste SUI 
TSeS OLSee 
TYPBN = 104405 
TYPE = 104401 
TYPOC = 104402 


1998 
16448 


eo 


se. 2019 + 20378 
eoss 3868087 ~—s 21018 
22278 
ees4 2257 3=s_ 22738 
26368 


3520 «3524 ) = 35378 
3598 36128 


46398 
171 1176 4 =©©3548 3580 3621 3693 3699 3704 
9: 3783 3808 4002 4035 406 
4145 84235 4236 4e39 4eSe Y4eb3 4eB2 4331 


3709 3726 3766 3772 3776 4118 4142 4238 


3727 
4129 
4338 


3761 
4132 
4356 


3767 
4134 
4523 


KO8 
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TYPON = 1 
TYPOS = tae z 
wee oly = iees HBS Take =” wom 
te 
cry rates 10s 1146% 11878 1188 1190 2727% 3711%  3733% 
CT 001406 10678 1190% 11918 1192 Yh a 
4 00141 10688 itase 1193% 
WSTART= 001 1 10878 
pee 1 8668 
a = RHEEEE U 44s] 
TYC O16404 ae 44398 
SATY 016360 quasg 
SAT 16366 4381 44368 
TY4 6376 W435 
0B 1134 Be 1163% 4232 4353 
ae ay lw ee 
SBODAT 001126 Bss4e il 1291 30S 1335% 1336 1350% 1380% 139S5* 1425% 1426 1440% 
14708 81471 14e5* 1515# 1316, 1 1 130) 157S% % 
Ht oe iG 696 iis jon tf iss jae’ ind fete bees ithe 
dime deel Lee eS aS a se 
3160 3163 3193% 196 3197 3e42% 2 3248 32 328i a5 sti 332° 
233 a208k sar} 3378 sep ze} 3443% 3483% 3506% 3509 
Kt FY 56 94% 35 3639 4716 4718 4723 4725 
SBELL 001164 Siee 4066 4102 
SBIN fp ‘Sis 4O34% 40428 
of 4 useee 4408 Y4415 44e4e 44e9% 
SCKSWR 015322 42248 4643 
AG OO11 eros 1 1097 1105 1111 1112 
s 108 
G 01604 wade 43488 
16042 4252 43478 
001222 9358 
SCRLF 001171 9148 4102 4110 4129 4134 4138 4263 4347 4397 4432 
a isos arse 1144% 3697 3703% 3708 3717 3725 3734 3736% 
ht nw ite 
SENDC 13426 37598 
See reat et tr 1157 407, 437 Yep Uf ed 4468 
te 
sein oblels arake {133 4p98 437; 4383 YAM is 
SEOPCT pt Saee 3756% 3760 
SERFLG 1103 8838 4O061* 41 4154 4184 4186 4192% 4214 
mh 6a Ge NE Gi UR 
SERRPC O01116 6908 * 4069% 4070 4102 4116 4716 4718 4720 4722 4723 4725 4727 
SERRTB 001256 9808 4124 
SERRTY 014704 4073 41098 


renOgeat-owatg MALL TGA) BLFEBT? Wd Oe WE 


4067% 4108 
lle =611les 4yo92 4102 


me) 
eaaeee 
888s 
pun 
ag 
£ 
43 
<= 
8 


a 
oe 
ei 
5 
pp 
penn 








13650 
eo A an 
SHD = 1 675 b76 
Sian alte a 
SILLip 1e7EB 4493 uso9 ueobe 
SINTAG 1135 eae 4Yeby 4 
SITEMB 1114 ry 4102 4113 
SLF 0011 91S@ 4102 4338 4347 32 
G Ol 4476% 44828 
0011 e8Se 1114% 1205S 4190% 4206# 4211 4213 
pol 0 pone 1115® 1207% 2173% 4089 4190 4207% 4213 
001232 928 
misas gcse 
001i 9558 
I cate A 872 Sele 1132 1157 4076 4205 4376 
001230 9508 
1234 9538 
1 citer} 
1 868m 
1 4436% 4442 4477% 4481s 
16065 4e59 43518 
1510 @ 444See 444ss 
lele 9298 44S7% 
1174 Seee 4450 4458% 4470 YY PUR 
160S4 4236 43498 
YP1 1225 9438 
1231 9Si8 
1235 95448 
YP4 O01e41 9578 
CNT Tes 4g 42138 
1154 # 4403 4492 
SNUTST= 1 12008 12398 12768 #1278 13218 1 13668 1368 WYll@ = =61413 
1503 15468 1548 1S91# 1593 16368 1638 16818 1683 17278 
18508 15s 18938 19388 19848 1986 202e9% 2031 20638 20988 
ece4# ec708 22968 23238 2325 23748 2376 e4eS# 2427 24768 


i 


MAINDEC-11 MACY11 27(665) 21-FEB-77 14:43 wee Oe 
DVKURE.PI1 "CROSS REFERENCE TABLE 
8 


tye Sere Ssebs S050" Seis Sues) Soave Seoss SRR SDR SO 


amie i2ioe 40188 
108 
11 ll 3689 : * 3754 3765 3799 +4197 4ei4 


= és 
£ 

-_ 

= 

-_ 

wo 





g 
TE aa 
45098 
aise uio24282=«i«NG3ssH7 = 42 
u29s8 (4644 
weose | 4GHS 
ue46 ; 
u 8 
t 
uE46 
Weoee 4510 4S11# ««4S12" © 4S288 
1103 «41638 
10848 1102 1 1107-1109 Ss. «Ssdd2)SssA4 = s1S3 «154 ©3751 = 48D 
a eC 
4 


S 





Bo h2ye 
re, 
Sool 
ny 
tet 
—- 
pate 
TU 
BRE 

at 

Boh 

238 

By 

a 
vo 

Ur 

pats 


~ 


1 1l 
1 16 206 
att 399 1 33 et RE 3217 a Sting 
3470 oe38 1 HN $369 0S1 40S2 4053 4054 
te Se Me Ue i He ue Ue up ue ee 
SSWREG poieie a338 1135 
s 698 4159 4160 4182 
ee peep # 4205s 
TIMES 1160 9108 1111 1204 #1285% 1330% 1375% 14 1465* 15102 1555*% 1600% 164S* 1690 
1821% 860% 897% ore 992% 2038% 168% 332% 2383% * e2485*  2536% % 
x is 1% 4x  3048% 132e% 3217% 33018 3407% 3470% 36.13% 
* 4193% 4200 4203% 4213 
ie 1146 9038 3813 421 428 yeus 4299 305 
TK 1144 9028 re 4 ue > 4266% 4297 a8 
Ls Pp iuse ine leei# 1255s % 3161%  3246% * 44723 4725 4727 
STMP3 001424 0748 910% 194i 912 19S4% gss* 1956% 1957 2135% 2136% 2137% 2138 
194% 195% 196% 344% e2345% 346% 52 395% 2397% 2398 # 
7% % g 97% 98% 99% 4% 49% 2550% 2551 2603# 
£ Sls See 2653% 4 & *%  2935% cag 
7 1s % % 3017% 18 19% 3020 3065# %  3067% 
101% 102% 103% 104 199% 3150% 3151#% 3152 318S5% 3186% 3187% 3188 32348 
3235% 36% 3270% 3271% 32728 g3e1# 3322%  3323% 3361% 
3362% 3 3435% 3436% 3437% 3438 3498% 3499% 3500% 3501 3555* 3556% 3557% 


ee ee eee ae ee ee 


So ala Oa 


STN = 000064 


16078 
Mee tle 
TYPON 14 
TYPOS 14174 


. pom H¥eEEE 
" = 001000 


thiar*Etcees 


aes 


GesaR iS Pease 


R 
oo 


88 


peeesgeu 


ote 


bee ° 


08 
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1239 

15108 

1688 

79 

tt 

46388 46398 

4063 4102 
43468 
4635 

4414 = 44198 
4017% 

7028 867078 
8758 916 
37248 8637708 

4353 4H 


4154 


ee 
1$558 est 
8 
8 
348 
a 
1 8 
4641 46428 
4182 4204s 
716% 844 
1091 1100 
3799 3800 
4505 4527 


i 
i 
CJ 


£ 
S 


>t 


1 13758 
16458 168 
i] 
% 
a 
t 128 
46458 46468 
4214 
849 850% 
11678 748 


11 
41488 4213 


856 
35518 
4214 


B09 a. 
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CROSS REFERENCE TABLE “. 
a 
ADTST 11988 1 , 
BUFLO i7ese 61 1765 
13 8328 , : * 
COUNTN 23208 2322 2373 2424 2475 2526 77 
CSROTA 12738 1274 1? 1364 1409 1454 1499 1544 1589 1634 1679 
9828 988 1004 1012 1020 1028 1036 1044 1052 1060 
DIVCH e9ss88 2959 3043 3127 sel¢ 3296 
6608 1223 381233 1257 126 1293 238 1308 1314 1338 1343 1353 1389 1383 1388 
1398 1404 1428 1433 1443 1449 1473 1478 1488 1494 1518 1S23 1533 1839 1S63 
1568 1578 1584 1608 1613 1623 629 1653 1658 1668 1674 1698 1703 1713 1719 
1740 1745 1755 1760 1779 1784 1794 1799 1838 1845 1882 1888 1926 1933 1971 
1978 2003 2010 2020 2025 2049 2055 2074 2080 2088 2093 2108 2115 2148 2153 
2183 2188 2209 e213 2247 2260 2265 2288 2309 2314 2361 2366 e412 2417 2463 
2468 2514 2519 2565 2570 2620 2625 2668 2673 2694" 26 2740 leg 2779 2783 
2810 2815 2839 2844 2867 2872 2911 2953 2398 3004 31 3038 . 3082 
3088 3115 3122 3166 3172 3199 3206 3251 3257 3284 3291 3338 3344 3374 3381 
3423 3428 3449 3455 3486 3491 3511 3517 3526 3530 3574 3539 3605 3642 
3647 3660 4565 4598 
ENDCOM le 
ENDPAS 37408 3761 
ERROR 7ebe 1226 1260 1296 1311 1341 1356 1386 1401 1431 1 1476 1491 1S21 1S36 
1S66 1$81 1611 1626 1656 1671 1701 1716 1743 1758 1782 1797 1841 1885 1929 
1974 2007 2023 2052 2077 2091 elll 2151 2186 22le 2291 2312 2364 
2415 e466 2517 2568 e623 2671 2697 2743 2782 2813 este 2870 2951 3001 
3034 3085 3118 3169 3202 3254 3287 3341 3377 3426 3489 3514 3529 3871 
3602 3645 3658 3856 3897 3931 3935 4568 
ESCAPE le 8328 
GETPRI ls 8328 
GETSWR la B3ee 11548 
INSTR 4O44e 4094 
. wah : ft B 2728 2735 2757 2767 2774 
NEWTST le 8328 1200 1239 1276 1321 1366 1411 1456 1501 1546 1$91 1636 1681 1727 
1811 1850 1893 1 1984 2029 2063 2098 2124 2158 2 2270 2296 2323 
2374 2425 2476 2527 2578 2633 2679 2710 2752 2820 2848 2877 2916 2960 
3128 3213 3297 3388 3534 
POP le 83e8 4478 4479 4514 4515 
porere 4 1*13 1253 2748 2787 3714 4564 
PUSH ls 83e8 4439 444) 4462 4495 4501 
RNCLK * 1908 19S3 2134 2193 2343 2394 2445 2496 2547 2602 2650 2892 e933 «= 2980 
—— =, =. 3100 3148 3184 3233 3269 3320 3359 3433 3497 3554 3585 3627 
| 
SUF 7278 §=61e4e 1284 1329 1374 1419 1464 1509 1554 1599 1644 1689 1730 1769 1820 
1859 1896 1941 1991 2037 2066 2101 2127 2167 2227 2273 2299 2331 2382 2433 
2484 2535 2586 36 2682 2713 2755 2798 2823 2851 2880 2919 2963 3047 3131 
TPRI ams =. 3406 3469 3537 le 3670 
ah 46278 “E28 4637 4638 4639 4641 4643 4644 4645 
TUP lt 8 1094 
SKIP le 8328 suis e016 2019 2060 2083 2085 2087 2191 2252 2254 2257 2592 3494 
ASH ls 8328 
SPACE 8328 


09 
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OVKWAB. P11 CROSS REFERENCE TABLE 

STARS 18 exes ue S3 SSeS NG 919 1200 1202 12399 lem 1 
1321 1328 1 1373 1411 1418 1456 143 1801 1508 1546 1853 1591 15 
1643 1681 1688 1 1729 «:1766)—Ss«d1:768 eit 1819 1850 1858 1853 1895 1938 
1984 990 2029 2036 2065 2098 21 2124 2126 2158 166 2224 2226 
eeve ge38 2323 2374 439 2381 0S 2S 2476 83 227 2534 2578 

bis e679 2681 271 e712 2752 e734 795 e737 east 2Be2 02 BY )~Ssé SO 

Seat 3468 3534 seep 5ep8 est mG 3944 4Oel 4047 4104 aie; iste iis 
4316 4355 4434 449] +4S07 4606 

SWRSU is 8328 i1i6e 

TPB pa = ® 3787 

TYPRA i B38 1149 

TYPNUM 1s 8308 
le bS4e8 8328 

TYPOCT le 8328 3697 3708 #3725 3765 3771 #«©&33777 «3841160 64140) (4237 

TYPTXT a7! Beet M71 1175 3548 3580 3621 3693 3699 3704 3721 #3727 «©3761 3767 

IOTM 38178 3821 3862 

21 18108 1813 1852 

Soa bees | base 

I le7e8 1278 3 1368 1413 1458 1503 1548 1593 1638 1683 21588 2160 23228 
23738 2376 24e4e 2427 24758 ? 25268 2529 25778 2580 33878 3390 34608 3463 
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